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SUMMARY 


The  computer  program  NERF  (Numerical  Evaluation  of  Reliability 
Functions)  has  been  designed  to  evaluate  the  reliability  functions  that 
result  from  the  application  of  reliability  analysis  to  the  fatigue  of 
aircraft  structures .  in  particular,  those  reliability  functions  derived 
by  PayneT*rr  and  his  co-workers  at  the  Aeronautical  Research  Laboratories. 
The  NERF  program,  although  based  on  the  Payne  reliability  models  is 
capable  of  extension  to  more  complex  models  as  the  need  arises. 


This  document  details  the  mathematical  development  of  the 
reliability  functions  evaluated  by  NERF  and  describes  the  computer  program 
in  sufficient  detail  to  allow  desired  modifications. 


0  COMMONWEALTH  OF  AUSTRALIA  1983 


POSTAL  ADDRESS i  Director,  Aeronautical  Research  Laboratories, 

P.0.  Box  4331,  Melbourne,  Victoria,  3001,  Australia. 


PHSFACE 


The  computer  programs  described  were  developed  and  listed 
at  AKL.  The  documentation  was  completed  by  Or.  Mallinson  after 
he  transferred  to  Auckland  University.  This  work  was  funded  by 
ASL. 


Accession  For 

BTIS  OR At I 
OTIC  TAB 
Unannounced 
Justification- 


« 

□ 


By_ 


Dlatrlbutlon/ 


Availability  Codes 
lAvall  and/or 


TABLE  OF  CONTENTS 


1.  INTRO DP CTION  1 

1.1.  Report  Outline  3 

2.  RELIABILITY  MfiraeT.t.Twa  5 

2.1.  Basic  Reliability  Functions  7 

2.1.1.  Definitions  7 

2.1.2.  Relationships  between  the  basic 

reliability  functions  10 

2.2.  Derivation  of  the  Most  General  Functions 

Evaluated  by  NERF  1 1 

2.2.1.  Definition  of  randon  variables  13 

2.2.2.  Tine  zones  and  physical  processes  14 

2.2.3.  Model  equations  17 

2.2.4.  Transformed  randon  variables  21 

2.2.5.  Expressions  for  Pg(t)  26 

2.2.6.  Oxe  effects  of  Inspections  28 

2.2.7.  The  derivation  of  risk  rates  36 

2.2.8.  The  density  function  for  strength  45 

2.2.9.  The  failure  density  for  strength  47 

2.2.10.  The  probability  of  failure  51 

2.2.11.  The  probability  of  detection  at 

an  inspection  55 


3.  DETAILED  SPECIFICATIONS  FOR  THE  MODELS  EVALPAIED 
BY  KERF  59 


3.1.  Model  Classification  System  61 

3.2.  Input  Data  Specifications  67 

3.2.1.  Crack  growth  function  68 

3.2.2.  Strength  decay  function  74 

3.2.3.  Probability  of  Load  Exceedence  80 

3.2.4.  Inspection  reaoval  and  crack  detection 

functions  84 

3.2.5.  Density  functions  for  the  basic 

random  variables  88 

3.2.6.  Model  parameters  91 

3.2.7.  Fatigue  life  limiting  95 


3.3. 

Data  Limits  and  Their  Effects 

97 

3.3.1. 

Default  limits 

100 

3.3.2. 

Notation  for  limit  functions 

101 

3.3.3. 

Conditions  for  the  existence  of  an 
integration  along  the  line  R&s<|<P) 

104 

3.3.4. 

Conditions  for  the  existence  of 
integrations  along  the  linef*t 

108 

3.4. 

Specification  for  the  Most  General  Model 

109 

3.4.1. 

Specifications  fdr  the  reliability 
functions  as  integrations  over 
initial  crack.  length 

111 

3.4.2. 

Specification  for  the  integrand 
functions  for  the  most  general 
model 

115 

3.5. 

Derivations  and  Specifications  for  Simpler 
Models 

118 

3.5.1. 

Constant  relative  strength 

119 

3.5.2. 

Constant  relative  fatigue  life 

123 

3.5.3. 

Constant  relative  strength  and 
relative  fatigue  life 

130 

3^6. 

The  Construction  of  a  Time  Sequence 

133 

3.6.1. 

Auxiliary  functions 

135 

3.6.2. 

Inspection  procedures 

138 

3.6.3. 

Simplifying  options 

144 

4..  NUMERICAL  METEODS  146 

4.1.  Numerical  Integration  148 

4.1.1.  Mathematical  basis  (single 

integration)  150 

4.1.2.  Implementation  (single  Integration)  157 

FUNCTION  ADAPT2  168 

SUBROUTINE  AC ASET  177 

SUBROUTINE  SRROUT  179 

4.1.3.  Multiple  integration  -  error 

considerations  183 

4.1.4.  Implementation  (multiple 

integration  191 

FUNCTION  ASAP TO  195 

FUNCTION  ADAPT  1  198 

SUBROUTINE  INFINT  199 


SUBROUTINE  INF LEI  201 

•SUBROUTINE  INFLE2  202 

SUBROUTINE  INFST  203 

SUBROUTINE  I NFS UP  204 

4.1.5.  Performance  205 

4.2.  Interpolation  211 

4.2.  1.  Mathematical  basis  212 

4 .2.2.  Implementation  216 

4.2.3.  Inverse  interpolation  218 

FUNCTION  FINTHF  219 

FUNCTION  EKRIV  222 

4.3.  Solution  of  Equations  223 

4.3.1.  The  secant  method  224 

4.3.2.  Implementation  226 

FUNCTION  F SOLVE  227 

FUNCTION  FS0LV2  22? 

4.4.  Mlscelaneous  Support  Functions  228 

4.4.1.  Function  range  limiting  228 

SUBROUTINE  RANGE  229 

4.4.2.  Index  location  231 

FUNCTION  INDHI  232 

FUNCTION  INDLOW  '  233 

4.4.3.  Merging  234 

SUBROUTINE  MERGE  235 

5.  DESCRIPTION  OF  THE  NERF  COMPUTER  CODE  237 

5. 1.  General  Coding  Philosophies  and  Methods  237 

5.2.  Principal  Phases  of  Operation  and  Program 

Output  240 

PROGRAM  NERF  241 

5.2.1.  Data  input  and  initialisation  of 

computational  algorithms  243 

SUBROUTINE  CFIN  246 

SUBROUTINE  RFSET 

SUBROUTINE  SETTAB 

5.2.2.  Development  of  a  time  sequence 
including  inspections 


SUBROUTINE  ADVNCE  26 2 

FUNCTION  RSKTOT  274 

FUNCTION  RSKLOG  279 

5*2.3.  Calculation  of  strength  distributions  280 
SUBROUTINE  FLPROB  28 1 

5.2.4.  Termination  285 

SUBROUTINE  CFNEW  286 

SUBROUTINE  CFOUT  287 

5.2.5.  Program  output  288 

SUBROUTINE  HEAD  295 

SUBROUTINE  OUTPUT  296 

5.2.6.  Graphics  operations  297 

The  Evaluation  of  Input  Functions  304 

5. 3. 1 .  Crack  growth  function  306 

FUNCTION  CRKDEV  307 

FUNCTION  CRKGR  308 

FUNCTION  CRKINV  310 

5.3.2.  Strength  decay  function  311 

FUNCTION  PSI  312 

FUNCTION  PSI DEV  316 

FUNCTION  PSINV  317 

FUNCTION  PSISET  3 18 

FUNCTION  STRFN  319 

5.3.3.  Risk  rates  320 

FUNCTION  RLOAD  321 

FUNCTION  RLOSET  322 

5.3.4.  Inspection  removal  and  crack  detection 

functions  323 

FUNCTION  SINSP  325 

5.3.5  .  Density  functions  327 

FUNCTION  ALPSET  331 

FUNCTION  BBTCNG  332 

FUNCTION  BETSET  333. 

FUNCTION  PALPHA  354 

FUNCTION  PBSTA  335 

FUNCTION  PDF  336 

FUNCTION  PDFSET  *  338 


FUNCTION  PRNO  341 

FUNCTION  RNONEM  342 

FUNCTION  RNOSET  343 

5.4*  The  Evaluation  of  the  Loss  Factor  344 

FUNCTION  GVAL  349 

5.4.1.  Structure  of  the  interpolation  table  350 

FUNCTION  ALPTAB  356 

FUNCTION  INITAB  .  358 

FUNCTION  HKTAB  360 

5.4*2.  Initialisation  362 

SUBROUTINE  NODES  364 

FUNCTION  RINTV  366 

FUNCTION  RLQAM  367 

5.4.3*  Interpolation  368 

FUNCTION  GALP  376 

FUNCTION  GSTAR  378 

5.4.4.  Special  considerations  when  including 

virgin  risk  382 

SUBROUTINE  QADJST  383 

5.5.  The  Evaluation  of  P-,(t),  P.  .(t),  r  (t) 

and  rv(t)  F  det  s  384 

5. 5. 1 .  Overview  384 

5.5.2.  Probability  of  failure  Pg(t)  391 

5.5.3.  Risk  of  static  fracture  by  fatigue  396 

5.5.4.  Probability  of  detection  Pd#t(t)  399 

5.5.5.  Virgin  risk  and  adjustment  of  Pg(t)  404 

FUNCTION  FALP  ~  410 

FUNCTION  FBBT  413 

FUNCTION  FDETO  418 

FUNCTION  FPDET  420 

FUNCTION  FRLTO  421 

FUNCTION  FRVO  424 

5.6.  Limits  and  Their  Evaluation  425 

5.6.1.  Default  limits  426 

5.6.2.  Limits  for  or  nQ  430 

SUBROUTINE  ALPHA?  434 

FUNCTION  FNOft  436 

FUNCTION  FRP  437 


5.6.3.  Limits  for  ?  438 

SUBROUTINE  BETALM  440 

5.6.4.  Limits  for*  442 

5.7.  Risk  of  fatigue  life  exhaustion  444 

FUNCTION  FRFO  449 

FUNCTION  FRF1  452 

FUNCTION  FRF2  453 

5.8.  Strength  Distributions  454 

5.8.1.  Probability  density  for  strength  455 

FUNCTION  FDSR1  460 

FUNCTION  FLDRO  46 1 

5.8.2.  Failure  density  for  strength  464 

FUNCTION  FLDFO  4?0 

5.9.  Basic  Communications,  Output  Procedures  and  471 

Mathematical  Functions  471 

5.9.1.  Communications  471 

SUBROUTINE  ECHO  475 

FUNCTION  INTEST  476 

SUBROUTINE  INTGIN  477 

SUBROUTINE  PROMPT  478 

SUBROUTINE  RE ALIN  480 

SUBROUTINE  XX TIN  483 

5.9.2.  Two-dimensional  data  array  output  484 

SUBROUTINE  IRROUT  485 

SUBROUTINE  ARROUT  486 

5.9.3.  Function  file  input  487 

SUBROUTINE  READFN  488 

5.9.4.  Run  time  monitoring  and  program 

termination  49 1 

SUBROUTINE  EXTIME  492 

SUBROUTINE  FINISH  493 

5.9.5.  Mathematical  functions  494 

FUNCTION  AL0G1  495 

FUNCTION  EXP1  496 

5. 10.  Graphics  Support  497 

5.10.1.  Outer  integrand  plots  499 

SUBROUTINE  PLTOUT  500 

SUBROUTINE  PLTSET  503 

SUBROUTINE  PtTSTR  504 


i 


j 

5.  10.2. 

Integrand  -  function  evaluation  maps 

505 

j 

SUBROUTINE  INTPLT 

512 

SUBROUTINE  PLTPNT 

515 

i 

5. 10.3. 

Loss  factor  maps 

517 

SUBROUTINE  ARRPLT 

520 

i 

| 

SUBROUTINE  RLINE 

522 

SUBROUTINE  GRID 

523 

j 

SUBROUTINE  CONT 

524 

SUBROUTINE  DIAG 

526 

1 

SUBROUTINE  P 

527 

1 

SUBROUTINE  SETPLT 

529 

l 

5.  io.4. 

Graphics  support  subroutines 

531 

I 

SUBROUTINE  FSIZE 

533 

SUBROUTINE  PLOTD 

535 

SUBROUTINE  SETGRF 

536 

SUBROUTINE  SCLFCT 

541 

SUBROUTINE  SMOOTH 

542 

/ 

5.10.5. 

The  graphics  post  processor  NERPLT 

545 

i 

PROGRAM  NERPLT 

549 

j 

SUBROUTINE  COMPRS 

551 

r 

| 

SUBROUTINE  FPLOTS 

552 

SUBROUTINE  FPOINT 

554 

FUNCTION  FUNC 

555 

I 

SUBROUTINE  PLTS 

556 

1 

SUBROUTINE  WINDOW 

557 

f 

5.H.  The  Data  Preparation  Program,  NEHPRE 

559 

I 

PROGRAM  NERPRE 

563 

SUBROUTINE  SELECT 

564 

1 

5.11.1. 

Preparation  and  editing  of  the  control 
file 

565 

| 

SUBROUTINE  CHANGE 

567 

1 

SUBROUTINE  CHECK 

569 

■ 

SUBROUTINE  PDFCNG 

570 

1 

SUBROUTINE  PDFOUT 

571 

SUBROUTINE  VALOUT 

572 

5.11.2.  Preparatioa  of  function  files  573 

SUBROUTINE  DAXIN  574 

SUBROUTINE  FCNFIL  575 

REFERENCES  577 

NOTATION  579 

A.1.  Cross  Reference  Listing  for  Subroutines  and 

Functions  590 

A. 2.  Definitions  for  Variables  in  COMMON  595 

A.3.  Alphabetical  Listing  of  Prompts  and  Error 

Messages  60*f- 

A. 4.  Program  Assembly  608 

DISTRIBUTION 
DOCUMENT  CONTROL  DATA 


I 


1.  INTRODUCTION 

The  application  of  reliability  analysis  to  the  fatigue 
of  aircraft  structures  leads  to  multiple  integral  expressions 
for  various  statistical  functions  referred  to  here  by  the 
generic  term,  'reliability  functions'.  These  functions  depend 
on  modelling  assumptions  regarding  the  fatigue  process  and 
the  way  that  statistical  variations  or  'randomness'  can 
be  accounted  for.  The  particular  assumptions  and  analysis 
leading  to  a  given  set  of  reliability  functions  is  called 
a  reliability  model. 

The  computer  program  NERF  (Numerical  Evaluation  of 

Reliability  Functions)  has  been  designed  to  evaluate  the  sets 

of  reliability  functions  for  a  wide  range  of  models  and  types 

of  input  data.  It  is  the  end  product  of  several  years  of 

development  of  numerical  techniques  and  computer  codes  for 

the  evaluation  of  reliability  functions,  in  particular  those 
i-+ 

derived  by  Payne  and  his  co-workers  at  the  Aeronautical 

Research  Laboratories  (ARL).  Recent  theoretical  analysis 

by  Mallinson5  has  established  a  general  technique  for  the 

construction  of  reliability  functions  from  given  model  assumptions 

and  the  relationships  between  the  Payne  et  al  models  and  other 

*"r  1-1* 

models  developed  at  ARL  by  Ford  and  Hooke  .  The  NERF 
program,  although  based  on  the  Payne  models^  now  follows 
the  general  analysis  of  Mallinson  and  is  capable  of  extension 
to  more  complex  models  as  the  need  arises. 
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Generally,  the  detailed  reliability  functions  are  complicated 
and  their  numerical  evaluation  requires  careful  construction 
of  efficient  algorithms  and  subsequent  computer  code.  NERF 
has  been  designed  to  minimise  the  involvement  with  this 
detail  required  by  a  user  to  apply  the  analysis  to  a  particular 
set  of  fatigue  data.  The  program  is,  in  fac^  supported  by 
an  interactive  data  preparation  program  which  ensures  that 
a  user  does  not  even  have  to  have  an  extensive  knowledge  of 
computer  operation.  Provision  of  graphics  facilities  by  NEHF 
and  an  interactive  post-processor  further  enhance  the 
ease  with  which  the  reliability  modelling  can  be  applied  and 
the  results  interpreted. 

* 

SERF  and  these  support  programs  form  a  complete  facility 
for  the  application  of  reliability  analysis  to  the  fatigue 
of  aircraft. 

The  complete  documentation  for  the  NERF  computer 
program  consists  of  three  reports.  The  general  theoretical 
basis  for  the  reliability  modelling  is  described  by  Mallinson  . 

At  the  other  extreme,  Mallinson  and  Graham3  detail  in  a  user 
manual  the  operation  of  NERF  for  the  user  whose  prime  Interest 
is  the  application  of  the  analysis  to  a  particular  set  of 
data.  This  document  fills  the  space  in  between  the  other 
two  by  detailing  the  mathematical  development  of  the  reliability 
functions  evaluated  by  NERF  and  describing  the  computer  program 
with  sufficient  detail  that  a  scientist,  or  computer  programmer 
can  understand  Vhat  the  program  is  doing'  or  make  modifications, 
(probably  respectively). 


1. 1  Report  Outline 


The  document  consists  of  two  main  sections.  The  first, 
comprising  Chapters  2  and  3  describes  the  mathematical  development 
of  the  reliability  functions  and  provides  a  numerical 

specification  for  the  NERF  program.  The  remaining  Chapters 
document  the  numerical  methods  and  computer  programming. 

Conceivably,  (particularly  considering  the  sise  of  the  document) 
these  two  sections  could  have  written  as  separate  reports. 

However,  it  was  considered  that  the  heavy  dependence  of  the 
computer  program  description  on  the  mathematical  section 
made  the  single  document  a  preferable  alternative. 

The  organisation  of  the  theoretical  section  is  straightforward 
The  development  of  the  most  general  model  evaluated  by  NERF 
is  presented  in  Chapter  2  and  follows  the  analysis  of  Mallinson^" . . 
Chapter  3  expands  the  analysis  of  Chapter  2  to  Include  less 
complex  models  and  the  various  optional  facilities  provided 
by  the  computer  program. 

The  organisation  of  the  program  description  is  not 
so  straightforward.  NERF  is  a  large  fCRTRAN  computer  program 
and  consists  of  over  100  subroutines  or  function  routines. 

Many  of  these  perform  operations  or  apply  numerical  analysis 
techniques  which  are  not  particularly  related  to  reliability 
modelling  and  can,  in  fact,  be  used  by  other  computer  programs. 

The  numerical  methods  for  integration,  Interpolation  and 
the  solution  of  equations  are  provided  by  one  such  group  of 
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subroutines  and  functions  and  are  described  in  Chapter  4  prior  to  the 

bulk  of  the  program  description.  This  Chapter  is 

organised  in  the  sane  manner  as  the  remainder  of  the  document 

in  that  the  description  of  particular  subroutines  and  functions 

are  included  in  the  Sections  and  sub-Sections  in  which  the 

operations  they  perform  are  described.  An  alternative  organisation 

whereby  all  the  subroutines  and  functions  are  described  in  am 

Appendix  to  the  main  report  was  rejected  although  particular 

descriptions  could  be  more  readily  located  in  such  an  organisation, 

most  descriptions  would  be  separated  from  the  the  discussion 

of  their  operation  by  considerable  volume  of  text,  making  reference 

between  the  two  difficult.  A  cross  reference  index  is  given  in  an 
appendix. 

Chapter  5  contains  the  bulk  of  the  computer  program 
description  and  is  organised  in  a  'top  down*  manner,  from  the 
most  general  code  to  the  most  particular.  Section  5.2  describes 
the  overall  control  code  which  selects  the  various  operations 
required  to  evaluate  the  functions  requested  by  the  user.  Sections 
5.3  to  5.8  detail  the  code  which  evaluates  the  reliability 
functions,  relying  of  course  on  the  the  numerical  methods 
presented  in  Chapter  4.  Section*  5.9  details  the 

basic  input,  output  and  terminal  communications  code  and 
5.10  describes  the  subroutines  which  provide  graphics  support. 

The  appendices  contain  various  detailed  sets  of  programming 
information  such  as  the  definitions  of  variables  in  COMMON  storage, 
a  cross  reference  guide  to  prompts  and  error  messages  and 
program  assembly. 
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2.  RELIABILITY  MODELLING 


There  are  several  phenomena  (e.g.  fatigue,  corrosion) 
which  progressively  degrade  the  ability  of  a  structure  or 
component  to  survive  the  effects  of  its  environment.  Ultimately 
this  degradation  process  results  in  the  complete  failure  of 
the  structure  at  a  time  which  is  a  function  of  the  environmental 
and  degradation  histories.  For  a  given  structure,  the  time 
of  failure  will  be  unique.  Unfortunately,  the  uncertainties 
in  both  the  environmental  history  and  its  effect  on  the 
degradation  processes  make  a  prior  deterministic  calculation  of 
the  time  of  failure  impossible. 

Certain  classes  of  structures,  such  as  aircraft  and  automobiles, 
are  manufactured  in  such  a  way  that  for  a  given  environment,  the 
degradation  processes  are  similar  between  members  of  each  class. 

It  is  then  possible  to  apply  statistical  methods  to  estimate  the 
time  of  failure  baaed  on  a  knowledge  of  the  mean  behaviour  of  the 
class,  deduced  from  experiments  or  from  service  failures.  Similar 
statistical  methods  can  be  used  to  account  for  variations  in  the 
environment  and/or  the  effect  that  the  environment  has  on  the 
degradation  process. 

A  reliability  model  is  one  such  statistical  method.  The 
models  evaluated  by  ftERF  have  all  been  generated  by  assuming 
that  the  mean  relationships  between  strength  degradation, 
crack  length  and  time  are  known.  That  between  crack  length  and 
time  is  dependent  on  a  time  scale  which  is  determined  by 
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the  envorinmental  history.  For  fatigue,  this  history  consists 
of  an  applied  load  sequence  and  the  tlae  scale  is  determined 
by  the  mean  load  application  rate.  Variations  in  structural 
behaviour  are  accommodated  by  introducing  random  variables 
as  parameters  in  the  strength  -  crack  length  -  time  relationship. 

There  are  several  ways  in  which  the  random  variables 
can  be  introduced,  leading  to  several  reliability  models.  For 
a  given  application  the  most  appropriate  model  will  be  that 
for  which  the  assumptions  behind  the  introduction  of  the  random 
variables  best  suit  that  application.  The  availability  of  adequate 
data  defining  the  required  probability  density  functions  will 
also  influence  the  choice  of  model. 

The  models  evaluated  by  the  NBHF  computer  program  are 
similar  to  those  derived  by  Payne  at  al ^  and  can  be  derived 
using  the  method  described  by  Mallinson^.  This  Chapter  describes 
the  application  of  that  method  to  derive  the  most  general  model 
evaluated  by  the  program.  This  lays  the  basis  for  the  detailed 
model  description  and  specification  which  follow  in  Chapter  3. 
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2.1.  Basic  Reliability  Functions 

2.1.1.  Definitions 

The  objective  of  a  reliability  aodal  la  to  evaluate 
'reliability  functions'  which  represent  the  aggregate  behaviour 
of  a  population  of  structures  which  fall  within  the  scope  of 
a  given  statistical  representation.  These  functions  are 
defined  briefly  below.  More  eoaplete  definitions  are  given 
by  Mallinson** . 

The  definitions  for  these  functions  are  relevant  to 
a  population  with  an  infinite  nuaber  of  structures.  It  is 
an  assuaption  of  the  analysis  that  the  nuaber  of  structures 
in  a  population  is  sufficiently  large  for  the  use  of  continuous 
functions  to  be  meaningful. 

(i)  Risk  rate  r(t) 

r(t)s  risk  rate  a  Fraction  of  reaaining  population  (2.1) 
failingAunit  tine),  at  time  t. 

In  aany  cases  it  is  convenient  to  regard  the  total  risk 

rate  as  being  the  sun  of  several  component  risks.  For 

the  aodels  evaluated  by  SERF,  three  components  are  identified. 

r(  t)  -  r g(  t)  ♦  rf ( t)  t)  ( 2. 2) 

where  r#(t),  rf(t)  and  ry(t}  are  the  risk  of  static  failure 

l>4«. 

by  fatigue,  the  risk  of  fatigue  and  the  virgin 

risk  respectively. 


Definitions  for  the  component  risks  are  given  in 
section  2.3. 

(11)  Probability  of  failure  Pf(t) 

Let  the  random  variable  T  denote  the  time  of  failure 
of  a  structure  in  the  population.  At  time  t,  the  probability 
of  failure  is  the  probability  that  F  is  less  than  t.  For 
a  large  population, 

P-(t) a  Fraction  of  original  population  that  (2.3) 

-  has  failed  before  time  t, 

a*  t).  7  * 

(Hi)  Probability  of  survival  P,(t) 

At  time  t,  the  probability  of  survival  is  the  probability 
that  F  is  greater  than  t.  For  a  large  population, 

Ps(t)*  Fraction  of  the  original  population  remaining 

-  at  time  t.  (2.4) 

Obviously, 

Ps(t)  «-PF(t)  *  1.  (2.5) 

(iv)  Probability  density  of  the  tine  to  failure  t) 

The  fraction  of  the  population  with  times  of  failure 
la  the  Interval  (t,t*dt)  is  given  by  py(t)dt  where 
Pp(t)  la  the  probability  density  function  for  the  time  to 


failure 


< 
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2.1.2.  Relationships  between  the  baalc  reliability  functjona 

From  the  definitions  of  the  hasle  reliability  functions,  the 
following  relationships  can  be  derived,  (Malllnson5*  ). 


PF(t)*®Fs-®fi  (2.6) 

dt~  dt 

r(t>  "  — l/(1“PF(t>)  U.7) 

='^s/pg(t)  (2.8) 

»  PF(t)/Fs(t)  (2.9) 

Pg(  t)  *  exp[-  [r(  t')  dt'  j  (2.  10) 


«  P,Ct>*j 


f (R)dR,  then 


Ps(Rjt)  a  f(R)/pF(t)  . 


If  Ps(t) 


*C 


g(R) dR,  then 


(2.11) 


pR(R(F>t)  *  gCB)/P^(t) 


(2.12) 


II 


2.2.  Derivation  of  the  Moat  General  Functions  Evaluated  by  NERF 

The  derivation  of  a  reliability  no del  for  fatigue 
relies  on  the  existence  of  a  functional  relationship  between 
strength,  crack  length  and  tine.  Parameters  In  this  relationship 
can  account  for  variations  In  behaviour  between  structures  in 
the  population,  and  become  the  randoa  variables  of  the  reliability 
model.  Given  probability  density  functions  for  these  randoa 
variables  and  a  relationship  between  strength  and  risk  rate, 
the  reliability  model  can  predict  the  aggregate  behavbur  of  the 
population  In  terns  of  the  basic  functions  defined  In  the 
previous  section. 

The  models  evaluated  by  BSR7  can  be  derived  using  the 

ST 

method  described  by  Mallinaon  which  is  summarised  by  the  following 
steps. 

(1)  Random  variables  representing  parameters  In  the  fatigue 
process  are  defined. 

(11)  Distinct  phases  in  the  fa  tig**  process  are  identified  and 
each  phase  associated  with  an  appropriately  defined  tlae 
zone. 

(Ill)  Tot  each  tlae  zone,  a  relationship  between  rlak  rate 

and  the  randoa  variables  is  establlsed  via  the  strength  “ 
crack  length  -  tlae  equation. 


!% 


(iv)  Transformed  random  variables  are  defined  and  tbe 
equations  established  to  this  stage  recast  in 
teras  of  those  variables. 

(v)  An  Integral  expression  for  Pg(t)  Is  obtained  by 
Integrating  an  expression  for  the  probability 
of  survival  for  structures  with  a  given  set  of  values 
of  the  random  variables  over  the  whole  space  encompassed 
by  those  variables  (Mallineon^* ) . 

(vi)  The  expression  for  Pg(t)  is  modified  to  Include  the 
effects  of  Inspections. 

(vll)  Having  generated  an  expression  for  P^Ct) ,  the  remaining 
reliability  functions  can  be  obtained  using  the 
relations  (2.6  -  2.12). 


The  derivation  presented  below  can  be  regarded  as  a 
parti eularlsatlon  of  the  more  general  treatment  described  by 
MalUnson5'  for  the  models  evaluated  by  HER7. 


I 


2.2.  1.  Definition  of 


The  models  depend  at  most  on  three  random  variables. 


<i>  lv 


Let  t^  be  the  fatigue  life  of  a  given  structure. 


Thei% 


*1 '  V‘t 


(2.13) 


defines  as  the  comparative  fatigue  life,  where 
tf  is  the  median  fatigue  life  of  the  population. 


(ii) 


It  the  commencement  of  time,  (taO),  structures  may  be 
cracked.  The  length  of  such  a  crack  for  a  given  structure 
is  denoted  by  Z^. 

(ill)  Relative  residual  strength 


As  a  structure  ages,  its  strength  decreases  as  the 


result  of  increasing  crack  length.  The  ratio  of  the 
strength  of  a  given  structure  at  a  given  age  to  that  of 
the  median  structure  of  the  same  age  is  called  the 
relative  residual  strength  X y 


f  | 

W  » 


It  is  assumed  that  suitable  density  functions  can  be  determined 
for  these  random  variables. 


iH- 


2.2.2.  Tina  «oa es  and  physical  pro  cease  a 

Three  phases  end  corresponding  tine  zones  are  Identified. 

For  a  given  structure  the  tines  for  transition  between  zones 
depend  In  general  on  the  values  of  the  random  variables. 

(1)  D1 :  Uneraeked 

Generally,  structures  coaaenee  life  uneraeked  and  therefore 
unweakened.  However,  this  tine  zone  does  not  exist  for 
a  structure  which  starts  life  with  a  pre-existing  crack. 

(11)  D2:  Cracked 

Following  crack  Initiation  the  structure  weakens  as  a  result 
of  fatigue  crack  growth.  This  phase  of  the  fatigue  process 
exists  from  the  initiation  tine,  t^,  (  or  0  for  the 
Initially  cracked  structure)  until  such  tine  when  It 
Is  inpossible  for  the  structure  to  sustain  even  the 
static  loads  laposed  by  its  envlronaent.  During  this 
tine  zone  the  strength  reduces  froa  the  initial,  or 
virgin  strength  of  the  uneraeked  phase. 

(ill)  D?:  Tailed 

During  the  first  two  tlae  zones,  structures  fall  when 
an  applied  load  exceeds  the  current  strength.  Such  failures  can 
be  expressed  as  a  risk  rate  as  defined  below.  There  are  however 


certain  conditions  which  are  known  to  lead  to  structural 
failure  regardless  of  the  applied  dynamic  loads.  These 
conditions  define  a  third  tine  zone  which  is  given  the 
naae  'failed'.  It  is  Important  to  note  that  any  structure 
that  enters  is  deemed  to  have  failed  but  Dj  does  not 
contain  all  failed  structures.  The  imposition  of  an  upper 
limit  for  D2  is  referred  to  here  as  fatigue  life  limiting. 

The  time  of  transition  from  to  denoted  here  by 
t.  Is  a  function  of  the  random  variables.  For  a  set 
of  structures  having  the  same  combination  of  values  of 
the  random  variables,  this  time  is  the  fatigue  life 
of  the  set  as  used  in  equation  (2.13);  if  a  structure 
falls  before  t^  as  the  result  of  an  applied  load  exceeding 
the  current  strength,  the  time  of  failure  for  that  structure 
will  not  equal  the  fatigue  life  for  the  set.  This  subtle 
difference  between  time  of  failure  and  fatigue  life  must 
be  remembered  when  establishing  density  functions  for 


The  models  evaluated  by  NEEF  can  be  divided  into  two 
groups.  The  first  group  assume  that  all  structures  commence 
life  cracked,  and  are  called  initial  crack  modals  to  diatlgulsh 
them  from  models  in  the  second  group  in  which  all  structures 
commence  life  uncracked.  fl&BF  does  not  model  a  population 
in  which  only  some  of  the  structures  are  initially  cracked. 


For  bo dal a  In  tha  first  group,  the  tine  zone  Dj  does  not 
exist.  For  models  In  the  second  group,  a  structure  is  in  if. 


t<  t±  *  (2. 14) 

where  t^  is,  in  general,  a  function  of  the  random  variables. 
Structures  belong  to  J>z  if 


and  D3  if 


t<tf 

t>t„ 


(2.15) 


(2.16) 


For  models  in  the  first  group,  structures  belong  to  D2 


0<  t  <t- 

—  X 

and  (2.16)  defines  Dj. 


(2.17) 


2.2.3.  Model  equations 


To  generate  the  reliability  no del,  an  expression  for  the 
risk  rate  for  each  time  zone  in  terms  of  the  random  ▼arlablea 
must  be  derived.  For  fatigue,  the  risk  rate  la  assumed  to  be  the 
consequence  of  the  applied  fluctuating  load  sequence  which  has 
two  major  effects. 

(i)  Damage  assumption 

Each  load  application  produces  an  Increment  of  damage. 

If  the  structure  is  on cracked  the  damage  produces  an 
Inevitable  approach  to  crack  initiation.  Following 
initiation,  the  damage  produces  an  increment  in  crack  length 
and  a  subsequent  reduction  in  strength. 

(11)  Contribution  to  risk 

Each  load  application  has  the  potential  for  producing 
structural  failure  if  the  load  exceeds  the  current  strength 
of  the  structure. 

The  damage  assumption,  and  the  fact  that,  in  terms  of 
the  fatigue  life  oJT  the  structure,  the  applied  loads  occur  with 
sufficient  frequency  that  variations  in  their  timing  may  be 
ignored,  permits  a  direct  link  between  time  and  load  applications 
to  be  made  via  an  average  load  application  rate  lr>  In  fact  the 
link  between  time  and  load  applications  was  emphasised  by  Payne 
et  al  bv  the  use  of  the  letter  If  to  denote  time. 
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Let  B  denote  the  current  strength  of  a  structure  and  L 
denote  load  magnitude.  From  a  given  load  sequence  It  Is  possible 
to  regard  L  as  a  random  variable  and  derive  a  stationary  probability 
density  pl(L)  for  the  applied  load.  The  probability  distribution 
of  applied  loads  Is, 

Pl(L)  »  (pL(L)dl/  .  (2.18) 

Because  this  distribution  Is  stationary,  the  probability  that 
an  applied  load  exceeds  the  current  strength,&,of  a  structure  is. 

P(L>  H)  »  1  -  Pl(B)  »  Pl(H)  .  (2.19) 

The  Instantaneous  risk  rate  Is  given  by, 

rk(t) s  *L(R),1r  .  (2.20) 

(The  subscript, k.  Is  used  to  denote  a  time  zone.  At  this 
stage,  equation  (2.20)  Is  relevant  for  any  time  zone.) 

The  damage  assumption  Is  Included  by  postulating  that  the 
strength  of  the  structure  Is  a  function  of  crack  length  which  Is, 

In  turn,  a  continuous  function  of  the  number  of  load  applications. 
Being  a  to  denote  crack  length, 

g*S(a(t>)  (2.21) 

which  functions  are  known  at  least  in  the  mean  and  have  the 
general  form  shown  In  figure  2. 1.  Functions  for  particular 
structures  are  obtained  by  introducing  parameters  into  equation 
(2.21).  These  parameters  become  the  random  variables  of  the 
model. 


Figaro  2. 1.  Qonoral  fora*  for  th*  aodlan  strength 
and  crack  length  function*. 
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For  an  uneracked  structure  la  Dj  the  strength  is  given  by, 

H=*35ft  (a.  22) 

where  RQ  Is  the  median  virgin  strength  for  the  population. 

For  a  cracked  structure  In  D ^  the  strength  Is 

R  »  XjSC  a( t/x, *  a" 1 ( x2) ))  ( 2.23) 

or 

RwXjS^t/x,*  t0)  (2.24) 

where  <f(t)  Is  the  median  relative  strength  decay  function, 

<f(t)  *R(a(t))/S0  .  (2.25) 

The  risk  rate  for  a  structure  In  Dj,  Is, 

rt(x,t)  a.PL(x^0)lr  (2.26) 

and  for  one  In 

r£(x, t)  *  PL( XjH t/x,  v  ?Q) )  .  (2. 27) 


A 
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2.2.4.  Transformed  random  variables 

The  random  variable*  defined  In  aeetlon  2.2.1.  are  those  In 

tens  of  which  the  reliability  nodal*  evaluated  by  VEST  were 

Initially  defined  by  Payne  et  al  .  Sone  advantage*  can 

be  obtained,  particularly  with  respect  to  the  numerical  procedures 

If  the  no  del*  are  east  la  terns  of  a  new  set  of  transformed  randon 

variables.  As  discussed  by  MalUneohf  the  use  of  transformed 

randon  variables  facilitates  comparison  with  other  reliability 

U- 1 

aodels  such  as  those  of  Ford  • 

The  Internal  operation  of  SERF  is  based  on  the  use  of 
the  transformed  variables.  However  Input  data  and  computed  results 
are  expressed  In  terms  of  the  original  set  of  variables.  It 
la  envisaged  that  the  user  of  WHF  will  have  little  requirement 
for  details  of  the  expressions  evaluated  by  the  computer  program 
and  the  equations  presented  here  are  directed  to  a  reader 
with  a  requirement  to  understand  exactly  how  the  program  works. 

The  reliability  functions  and  the  ensuing  program  specification 
and  description  are  expressed  In  terns  of  the  transformed  set 
of  random  variables. 

The  notation  used  her*  differs  from  that  used  by  Malllmson9 
and  the  conventions  used  for  random  variables  In  the  previous 
sections  of  this  refdrt.  This  different  notation  was  used  during 
the  development  of  the  computer  program  and  It  was  considered 
more  efficient  to  retain  It  la  the  documentation  rather  than 
change  the  symbolic  names  throughout  the  computer  oode. 
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The  throe  random  variables  is  the  transformed  set  are 
defined  'below. 


(1)  £ :  Age 


Significant  reductions  is  the  complexity  of  the  reliability 
functions  can  be  obtained  if  the  argument  of  f  is  used 
as  a  random  variable.  This  argument  is  a  measure  of  the 
age  of  a  structure  and  is  related  to  the  original 
random  variables  by, 

0  *  t/X,  ♦  a"1^  (2.28) 

Age  is,  in  fact,  equivalent  to  median  time,  t. 

(11)  :  Vlr<an  strength 

From  (2.22),  the  virgin  strength  of  any  structure,  at  say, 

•CaXjHo  (2-29) 

(ill)  Sq:  Initial  crack  length 

aQ  is,  in  fact  equivalent  to  Xj.  In  some  Instances  it 
may  be  more  convenient  to  use  Qq,  which  from  (2.28)  is 
iaitisl  are,  i.e., 

“o*  *",(*0) 


% 


(2.30) 


Using  p^(«0 ,  p^Sg)  and  p^C aQ)  to  daaota  the  density 
functions  for  oc  ,  »,Q  and  nQ  respectively, 


».<«■)  »  PjC®*  • 

(2.3D 

%'V  * 

(2.32) 

*“d  P-CO  s.  p„  (a(nQ))da 

“0  w  42  u  daQ 

(2.33) 

The  density  for  £  is  conditional  on  the  value 

for  Sq  or 

alternatively,  nQ.  Using  p^(|l)  to  denote  this  conditional 
density  (rather  than  p^^Sq)  or  p^(^[nQ), 

P^f)  *  Pj^t/^-IlQ))^^-!^)2  . 

(2.34) 

In  tarns  of  ths  transformed  variables,  the  risk  rata  equations 

are, 

r1  ,r1(*)r  ■  PLU)lr  (2.35) 


and 

r2«r2(a,f)  s  P^ety^))^  .  (2.3 6) 


The  tine  zones  can  now  be  defined  as  subspaces  of  the 
transformed  random  variable  spaoe.  Adding  to  the  fatigue  life 
limiting  condition  the  requirenent  that  surviving  structures 
aust  have  strength  greater  than  some  niniaum  value,  R^a  say, 
an  uncraeked  structure  in  Dj  has. 


0  <  ?  <•  \ 


» 


U.J7) 


Note  that  the  Dj  subspace  ezlate  only  when  <  t^« 
corresponding  to  <  0. 

For  a  cracks d  structure, 

ti<a0<tf  )  (2.38) 

Note  that  the  order  in  which  the  Halts  are  specified  (and 

hence  the  order  In  which  the  nultlple  Integrations  are  nested) 

differs  from  that  used  In  the  theoretical  discussion  of  the 

S" 

genesis  of  reliability  models  presented  by  Mallinson  .  The 
computer  prograa  always  Integrates  the  strength  parameter  as 
the  Innermost  integral;  the  model  derivation  presented  here 
follows  the  order  most  relevant  to  the  computer  prograa. 

The  time  zones  are  shown  as  subspaces  of  the  transformed 
random  variables  ©(  and  /Z  in  Fig.  2.2. 


Figure  2.2.  Position*  of  th*  aabapaco  boundaries 
la  <x ,  (?  space  for  eoaatant  a^.  For 
Initial  erode  models  with  aQ>  t^,  bo 
atraetoraa  alii  ejd.at  to  tha  left  of 
tho  broken  line. 

D1  -  Unc racked  structures 

Dg  Cracked  structures 

D_ 


-  Failed  structures 


>.2.5.  Expressions-  to*  P=Ct) 


01 van  the  expressions  for  the  rink  rates  in  each  tine 
zone,  the  probability  of  survival  can  be  written  In  the  form 
(Malllnson^), 


Ps(t)*  H(x,t)px(x)dx  +-J  H(x,t)px(x)dx 


(2.59) 


where  p^(x)  Is  the  joint  density  function  for  the  randon 

mm 

variables  X  and  B(x,  t)  Is  a  loss  factor  equivalent  to  the 
probability  of  survival  for  structures  with  X »  x  up  to  tine  t. 

H(x, t)  *  exp^-r^x)^  (2.40) 


and  for  x6  0, 


2  r 

E(x,t)  *  expj-r^(x)t^  -  r2(x,t*)dt'J  .  (2.41) 


In  terns  of  the  transforned  randon  variables,  the 
joint  density  function  for  tC  ^  and  can  be  written  as 

*«,p,a0(*»t'Ib)'Il<.i,0v*Q(aO)y$laO) 


»P*(«t)pBo(ii0)p?(^)  (2.42) 

using  the  notation  of  (2,34).  for  structures  in  Dj,  with  nQ  =»  0, 


H (<*,(5,1^,  t)  *  exp^-r^aOt]  (2.43) 

and  for  structures  in  D,  with  a.aO, 

6  o  1  p 

HU^.ttQ.t)  a  •xp[-(t/?)[r1<ec)\i.^r2(-,^*  )  d^  (2.44) 


47 


If  nQ>  t^f  t^  in  (2.41)  can  be  regarded  aa  being  zero,  Dj 


does  not  exist  and  in  0. 


H(t,f,no,t)*  exp{-(t/(^-nQ))  j  r2U, (l')dp'l  (2.45) 


Using  the  limits  defined  by  equations  12.37-38),  the  expressions 
for  P^( t)  for  a  population  of  initially  cracked  structures 


is.  _ 

PS(t)sJ  Pa0U0)j  P$(£> 


°0  Vn/^(e) 


(«-)  H(dt ,  (1 ,  nQ ,  t)  d*d£  dnQ 

....  (2.46) 


where  H(<*t(Jtn0,  t)  is  defined  by  equation  (2.45). 
For  a  population  with  n^s  0,  (l-  39), 

r00 

Pg(t)  -  J  p^CaOesp^-r^aOtJ  dk^Ctj) 


“min 


V*’I 

Jt.  H. 


pA(oc)I(e.,^,n0,t)  d*d@ 

■WW 

with  the  loss  factor  defined  by  (2.44). 


(2.47) 


Equations  (2.46)  and  (2.47)  define  the  probability  of 
survival  for  the  two  groups  of  models  evaluated  by  NERF.  ill 
other  reliability  functions  can  be  derived  from  these  expreaslonns 
using  equations  (2.6-2. 12). 


2. 2. 6.  The  effects  of  inspections 


An  inspection  has  two  effects  on  the  population  of 
structures. 

(i)  Structures  that  are  detected  to  be  deficient  according 
to  appropriate  criteria  are  removed. 

(11)  The  structures  removed  during  an  Inspection  may 
be  replaced. 


The  first  effect  modifies  the  joist  density  function 
for  the  random  variables.  Following  an  Inspection  at  ti^  say, 
the  probability  of  survival  can  be  evaluated  by  replacing 
Px(x)  in  (2.39)  by  px(x)  where, 


px(x)  s  px(£)S(x,tiJ  (2.4$) 

mm  * 

and  Six, ti^)  is  a  function  representing  the  removal  of  structures 
during  an  inspection.  The  total  fraction  of  the  population 
removed  during  the  inspection  is  called  here  the  probability 
of  detection  at  ti^,  P^^ti^)  and  is  given  by, 

Pdet(tV  =  pS<tlj)  "PS(tV  <2-49  > 

where  Pg(tiJ  and  Fg(ti.)  denote  the  probability  of  survival 

w  ^ 

evaluated  by  equation  (2.39)  using  Px(j)  and  px  (x)  respectively. 


The  second  effect  is  more  difficult  to  model.  In 
general,  the  replacement  structures  comrfrom  a  population 
with  different  statistical  properties  from  the  original. 


Accordingly,  the  probability  of  survival  following  the 
inspa etlon  can  be  written  in  the  form, 

Ps(t)  =  Pj-V(t)  4-  pJ(t-tiJ).P<|0t(tlj)  (2.50) 

where  Pg-1(  t)  is  the  probability  of  survival  for  the  population  existing 
prior  to  the  inspection  and  Pg(t-tij)  represents  the  probability 
of  survival  for  the  population  of  replacement  structures.  As 
the  inspections  occur,  the  number  of  terms  in  (2.50)  Increase. 

Fortunately,  useful  calculations  can  be  made  without 

involving  the  full  complexity  of  a  general  replacment  analysis. 

KERF  offers  two  options.  Replacement  structures  can  be  assumed  to 

be  repaired  in  such  a  way  that  they  are  no  longer  susceptible 

1 

to  a  risk  of  failure  (Payne  )  or  the  calculations  may  proceed 

o 

without  replacement  (Hooke  ) .  In  either  case  only  one  population 
need  be  considered  in  the  analysis. 

Returning  to  the  effect  of  removal  during  an  inspection, 
the  function  S(j5,ti.j)  can,  in  principle,  account  for  failures 
in  the  inspection  procedure.  Earlier  versions  of  the  NERF 
computer  program  assumed  that  inspections  were  perfect  and  that 
S(x,ti  )  was  a  step  function  which  had  the  effect  of  modifying 
the  integration  limits  in  the  expressions  for  Pg(t)  and  the 
derived  reliability  functions. 


do 


« 


Two  inspection  criteria  can  be  applied  by  NERF. 

(i)  Crack  length 

The  function  S  is  assumed  to  have  the  form, 

SCx.tij)  a  Sj(tij/*1  *n0)Hs(td  -  n0  -  ti^x,).  (2.5D 

HgCm)  is  the  unit  step  function  such  that  H s(z)*0  for 
z^O  and  Hs(z)  *1  for  z>0.  The  mean  'cut  off  time',  td, 
corresponds  to  a  crack  length  a^  beyond  which  the  inspection 
is  known  to  be  perfect,  ( t*d  a-1  (ad)) .  S^(x1ftij)  is 
a  removal  function  the  form  of  which  does  not  change  between 

inspections. 

Making  the  substitution,  x1  a  t/((?  -  nQ), 

S(of',ifi4n0,ttti;J)=Hs(((td-n0)t/tij+n0-/5  )ti;j/t;iSj(n0+(/6-n0)ti.j/t). 

.  (2.52) 

For  given  nQ,  all  structures  with  (J>n0-t*  (td~n0)t/ti^  have 
been  removed  by  the  inspection  at  ti...  Following  a  crack 
length  inspection,  the  limits  of  Integration  for  cracked 
structures  are, 

,  "0«pst;  • 

where 

a  min  £  tf,n0*  (td-n0)t/ti^  }  (2.54) 

and  depend  on  only  the  last  inspection  time,  ti^.  The  positions 
of  the  D1  and  Dg  subspace  boundaries  for  given  nQ  are  shown 
in  Figure  2.3. 
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The  function  S^(n0  +  (  (5  -  n0)ti../t)  modifies  the  density 
function  at  each  inspection  so  that,  following  the  r'th 
inspection, 


pj(p)  »  p j(f)TT  [s^nQ  +  (0  -  nQ)ti^/t)J .  (2.55) 

Throughout  the  remainder  of  this  document  *111  be 

* 

assumed  to  be  replaced  by  p.(ft)  following  inspections. 


(ii)  Proof  load 


All  structures  are  subjected  to  a  proof  load  of  magnitude 

R  say.  All  structures  with  R<R  are  rejected  so  that 
P  P 

S(*,p,a0,t,ti.j)  a  Hs(t/((S-  nQ)  -  tl^/C^CR  *e>  -  nQ). 

.  (2.56) 

The  domain  limits  for  cracked  structures  are, 

t1<a0<tf;  n0  <  $  <  tf  (2.57) 

where 

oC*  x  max  l  Rmin/W  >Rp  /f (  n0  *  (  $  ’no)ti  jA)i  • 

-  (2.58) 

For  uncracked  structures,  R^  sets  a  lower  limit  for  •(. 

The  positions  of  the  D1  and  boundaries  for  constant  nQ 
are  shown  in  Figure  2.4. 


Note  that  a  proof  load  test,  by  its  nature,  results  in  a 
'perfect1  inspection.  There  is  no  removal  function  in  this 


case 


Figure  2.4.  Integration  domain  bonndarlos  following 
a  proof  load  Inspection. 


Integration  domain  for  eraeked  atrnetnree. 


\\\  Potential  for  rejection  by  an  inspection 
at  the  current  time. 


(iii)  Combined 


It  is  possible  that  both  types  of  teat  are  performed  at 
an  inspection  following  which  the  more  severe  of  the  expressions 
in  (2.53)  or  (2.57,2.58)  apply.  The  expression  for  Pg(t) 
for  initially  cracked  structures  is,  < 

pa 

,{S  ,nQ,  tJdAdfdng 

t 

...  (2.59) 

and  for  a  population  without  initial  eradcs,  (c  *  (147 )) 


s(t)a  J  exp {-r , (* ) t\ d*P^( 


P 

1% 


<f> 


.  (2. 60) 


The  sub space  boundaries  following  a  combined  inspection  are 
shown  in  flgum  2.5. 


Figure  2.5.  Integration  doaala  bouadarlea  following 
a  ooablaad  crack  length  and  proof  load 
Inspection. 


/// 


Integration  doaala  for  eracked  structures 


\\\ 


Potential  for  rejection  bp  an  Inspection 
at  the  earreat  tine. 


The  expressions  for  the  total  risk  rate  can  be  obtained 
from  those  for  the  probability  of  survival  via  equation  (2. 8). 
The  differentiation  of  expressions  involving  time  dependent 
transformed  random  variables  requires  some  care  and  Malllnson'5 
derived  a  general  result  for  the  case  when  a  single  time 
dependent  random  variable  was  the  Innermost  variable  of 
Integration.  Although  this  Is  not  the  case  in  equations 
(2.59)  and  (2.60) ,  the  general  result  can  be  applied  recursively 
to  yield  the  required  risk  rates.  An  alternative  approach  would 
be  to  rearrange  the  order  of  integration  so  that  {5  was  innermost 
and  apply  the  general  result  directly.  Both  approaches  yield 
the  same  expressions  for  risk  rate. 


<2.63) 


Differentiation  of  equation  (2.61)  with  respect  to  time 


yields, 

p*(t)sL 

*i 

and  applying  (3.73)  obtained  by  Hallinson* , 


i—  7 

St  *1 


(2.64) 


*  Q  -  IIU;)  1  •  U 

noting  that  •>£  1  ($-  n^/t;  ebon  t*  =ag  v  (td  -  n^t/tl^ 

5^1 1*  "  n0)/UJ=  ^f  ,  so  that  the  seoond  tera  in 

f  dt  m  ( 

(2.63)  is  non-zero  only  when  t,  *  t,  la  which  ease  *f»  0 

1  1  H 

and  -  nQ)/t  and  (2.63)  beooaes. 


(2.65) 


’*  *  * 
t. 


rf 

St  \<V*  Vf>(»  *  &  twV»<v#>* 

^  J  tl  W 


-?(tg,tg)(tg  -  V*,  .a(aO»V  • 

fr - -A — — - 


(2.66) 


Applying  the  differential  operator  In  the  first  tern  of  (2.66) 
to  (2.63)  produces. 


(it  *  It  I?)  Tvf'v?> 

=  j  *  JTijr 

at* 

~  (*£  +  $  v‘> 


(2.67) 


It  can  be  readily  verified  that. 


(it  +  3T  s  « 


*  -r2(w,^,t)H(«(,|J,n0,t)  .  (2.68) 


Substituting  (2. 67),  (2.68)  and  (2.63)  into-  (2.66) 


Jt  Tn0(a0} 


*** 

rf  r 

*“\  P^(£)  I  ^  H^.^n^t^^oOdtfdfS 

J»o  ^ 

A  . 

-j  (' *■  &  $K(*#)HU#,f,vt>v^ 

“0 

•  5(  tj,t^)(t^HBg)  P(t(,<.)H(a(^f  •Sq,  t)  pp(t^)< 


t  «** 


(2.69) 


«t  «"«lwr(?f)»W(,,o  +  af  u-70) 


where 


The  second  term  in  (2.69)  is  non-zero  only  when  J*  aU^  /p(p), 
corresponding  to  those  $  values  for  which, 


i  ‘  V11/**-  u-7,) 

Defining  fl  D  as  the  /S  value  at  which  the  equality  in  (2.7l) 
rp»Hain  ‘ 

occurs,  it  follows  froa  the  fact  that  R  >R .  that  6  „  }  nQ. 

™  p»“nin 

Moreover,  the  relationship  (2.71)  holds  only  for(J>/3  _  ,  The 

r'rP»KBin 

lower  limit  of  integration  for  the  second  term  in  (2.69)  can  he 
replaced  by  S  „  j  for0>|8  _  *>  that  =.  0 

P*  min  ^‘“aia1  *“  r  5t 

and  the  tera  can  be  transformed  to  an  integration  over  sC* ,  viz. 


/■“f  # 


Wf‘V 


Hmin/f(Pp,RBla) 


V?  )p<(*-  )H(*  »P  »ao» t) 


....  (2.72) 


where 


Note  that  the  tera  e:d.sts  only  when 


rW  *  ^ 


(2.73) 


(2.74) 


Using  M  a  (f"  “0)/t  and  noting  that  oc  in  (2.72)  is  now  a  dummy 
variable  of  integration,  the  second  term  in  (2.69)  can  be  replaced 


Wr<v  # 


-  nQ)  p^(«0  p^  ( f )  H(rf  ,/* \  nQ ,  t )  dct . 


^ii/^fp  a  ) 
*  ’min 


Substitution  into  (2.61)  and  applying  (2.8)  yields, 


r(t)Ps(t)  »  P/:(t) 

\  '  * 
p«  tv 

'a0 


y*> 


*2. H(*l»?»n0»t)P4tU)drfdfdi^ 


oC 


'd  /^ndj/^V 


V"0’ 


w«'^‘ 


(ft*  -  lip)  pA(«OS(«e(^*(j^ft)p^(  (J^dadi^ 


rtd 


r 


y(no)S(^f^f)P(»(V(Vno) 

”  t 


P^U  )  H(  a,  tf  ,  nQ,  t)  decdn^ 


Jot" 


(2.75) 


The  first  tarn  in  (2.75)  accounts  for  tbs  failures  resulting  from 
loads  in  the  applied  fluctuating  sequence  exceeding  the  current 
strengths  of  the  structures  in  the  population  and  is  the 
contribution  referred  to  here  as  the  risk  of  static  failure 
by  fatigue,  r8(t).  The  second  tern  accounts  for  failures 
resulting  fron  the  strength  being  reduced  to  n  and  the  third 

tern  represents  structures  that  have  reached  their  fatigue 
life  liait.  Both  terns  combine  to  yield  the  risk  of  fatigue 

Ufa  exhaustion,  rf(t). 


4/ 


The  expression  (2. 75)  is  incomplete  In  that  generally 
the  Integrands  In  the  last  two  terms  are  zero  for  some  values 
of  zIq.  To  derive  explicit  integration  limits  It  Is  necessary 
to  consider  the  limiting  processes  Implied  by  the  inspection 
procedures.  The  general  situation  for  given  nQ  and  time 
t  greater  than  tL^  is  shoes  In  figure  2.6.  The  second  term  In  (2.75)^ 
being  an  integration  along  the  line  »H1  exist  only 

if  p  _  <t,  .  This  condition  Is  met  if, 

p’Rmin  S 

WV^f*  >  V^“o  *  Ctt  ‘  V*1/**  *  (2*76) 

(The  left  hand  side  of  (2.76)  Is  the*. value  of  the  Intersection 
of  the  minimum  strength  boundary  with  :  the  right  hand  side 
is  the  < value  of  the  Intersection  of  the  proof  load  boundary 
with  (J=t*.) 


For  tjs»0t(t4  -  nQ)t/tij,  equation  (2.76)  can  be 
reduced  in  the  following  manner. 

(2.76)  *  wr<^)  *  yr<y 

t*  >f"h  Rmi  f«f(  tH )  /Sp)  ,  (assuming  pis  mono  tonic 

and  decreaslng)> 

=»  n,<  (tdt - f 1  (SBia^(  td)/Rp)  tl :A  t-tij ) .  (2.77) 

For  tf  s  tf , 

(2.76)  ^Wfttf)  >  Rp/yUo+Ctf  -  nQ)U3/t) 

=»  n0<  (t.f ' ,(Bpf(tf)/Sal^-tftlJ)/(t-«.J).  (2.78) 
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Both  conditions  can  be  combined  to  yield. 


nQ<  C«la(td,f“,(RBr(tf)/RBia)5  t 

-  Bl4?f.r’1(Smin?’^d)/Sp)j  tid)/(t“ti3) 

<fn0(fiiain>’  **3'  (2,79) 


The  third  term  in  (2.75)  is  an  integration  along  the 
line  $~tf  and  exists  only  when  t*  >  tf .  Thi «  condition 
is  equivalent  to. 


n0<(tdt  -  tjtljJAt-tij) 

o  '  S^’ 


(2.80) 


Equations  (2.79)  and  ( 2. 80) define  the  upper  limits 
for  the  nQ  integration  in  the  second  and  third  (or  r^)  terms 
in  equation  (2.75). 


In  a  similar  manner  to  that  described  above  for 
(2.59),  equation  (2.60)  can  be  differentiated  to  derive 
the  risk  rate  for  a  population  without  initial  cracks. 

The  remit  of  this  differentiation  is. 
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,«o 

r(t)Ps(t)  r  p^CaJrjCoOexp^-r^H^dot.P.C?) 
~  J  o  r 


t±  JoC 


+■  P^Cf)  #  P^CoOHCot^.nQ.t)  r2(«tt^)(i«i(S 


+  ll  p^U)H(«t,^#,n0,t)pp(p*)drf. 

^  WKfp  *> 

'  rj  ''mm 

■+  S"  ( t^» t^)pp(  t^)  t ^  I  p^^JHCat,  t £, 0^,  t)d<*.  .(2.2 

rjA 

The  last  three  terns  of  (2.J1)  are  obvious  slapllfi cations 


of  (2. 75)  with  Uq-O.  The  first  tern  accounts  for  the 
failure  of  uncracked  structures  In  and  contributes  to 
the  virgin  risk. 


s  > 
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2.2.8.  The  density  function  for  stronf 


Given  an  expression  for  the  probability  of  survival, 
the  density  function  for  strength  can  be  obtained  using  equation 


(2. 12).  Using  the  relationship, 
8  «*/(#)  , 


(2.82) 


the  Integration  over  <*.  in  (2.5 9)  can  be  transformed  to  one 
over  8,  so  that, 

-  •  t  go 

ftd  ftf  •  ( 

ps(t)»  p^J^)  Pfl(£)  _  p-(8/y'(^))H(H/f(^),^,a0,t)dBdfdn0# 
'tj  ”  ^  •'B*  f  (p) 


(2.83) 


where 


8  *  ) 


^•V(f,/r(1ot (? " W*}  -(2-84) 


Bearranging  the  order  of  integration  yields. 


/"f _  (8)  .t, 

PS(t)sJ  Pjl/V  P?(f) 

W*i  J,*x«,p,S'aO 


8 it(8/f(f))H(8/y'(^)^,ao,t)dfdn0dB 

V  J7'?’ 


whor«  (5  D  is  thoflvoluo  for  which, 

PfK  1 

8  =  apr(^)/r(n04.(()  -n0)ttJ/t) 

and  f  (R)  is  defined  by  (2.79),  with  8^  replaced  by  8. 
“o 


(2.  84  aJ) 


(2.85) 


Using  (2. 12) , 


PH( H  )  '£  >  t) 


p„_u0) )  Ps<f)p^WP>)HCH/r<P>.?,Vt)df.in0 
■'•“ifp.ibM  ^ 


(2.86) 


Starting  with  (2. 60),  the  probability  of  survival  for 
a  population  without  Initial  cracks  can  be  written  In  the  form. 


Ps(t)  s  j  pst(H)exp[-r1(R)t5<».P?(t1) 


a 

P 

r  [ f  v*>- 

H«in  a“lVPp, 


C^)pA(R/f<^))H(R/^(^),p,0  , t) djtdft. 

, 

fp.a! 


(2.87) 


and  the  density  function  for  strength  becoaes, 
pH(R  |  l  >t)  =^Ha(R-Rp)pat(R)exp{-r ,(R) t^ ^( t±)  -h 

f  f  Pt^)Pa.(8/f(?»H(R/r(P),?,0,t)dfl/ps( 

_ PP  *  ~ 


(2.88) 


Given  an  expression  for  Py(t),  the  failure  density  for 

strength  can  be  obtained  using  equation  (2.  if  ).  Starting 
with  (2.75),  the  cl  integration  can  be  transformed  where  possible 
to  an  B  integration. 


r*d  ft  f 

Py(t)a !  P  ^(hq)  Pp(f)  #  r2(B/f(t)),t)pJ  R/f(f)) 

Jt,  ju 


Irn0^finin^  f*ain‘ 

*.  .... 


I  H(s/f  (  0)  ,  M0#  t)  dHd^dn0 

Wf‘y  ^ 

I  <P#  -  »o)lU.(oc)H(ot » f  .n0,t)P|(0^ 


+  . 

J*i 


t)(kv{ . 

t  JRf 


P,  (R/-^( tf  ) ) K(R/f  (lf )  , tf , ttQ,  t) dRdnQ 

- ^tp - 


....  (2.89) 

where 

S^Bq)  =  ■“{BBin»V(V/f'(B0  +  (*f  ’  •  (2*90) 

The  second  tern  cannot  be  transformed  since  each  inner  Integration 
is  along  the  line  R  s  RBia. 
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Rearranging  the  order  of  integration  yield*, 


rVa) 

P(S(t)«J  r2(H) 

-  p"oCdo> 

8aia 

‘l  0  J 

Ctt 


Pf(j»>P^CR/y<^>  )H(B//(p>pta0>t)d9dnft<ffi 


fi^Sai a)  fWf(V 


P-0U0) 


<£*  -  ao>  P«J*>Pft(^g(«»P%n,t)d*dn„ 


^(H> 


Bl(t4  ) 


Pa  (ao)Pfl(tf)<Vn0)P<CB/^tf))H(H/y>(tf)>tftao>t)dn0dB 


f  1  vi 


(2.9D 


where 


f20(H>“  <t'1<Rpf'(V/8)t  *  ViJ)/(t”tlJ)  •  (2«92) 


(Rota  that  fd  (R)  la  equivalent  to  f  as  defined  by  (2,80) 
„  u  .  ^  u 

but  with  td  raplacad  by  p  (H  <p(tj)/S).  ) 


Raliig  (2.  it ) ,  tha  failure  density  for  strength  is. 


pR(R|t)a  r2(B) 

57TF  J 


/,fn0t8)  f\ 


p«o(0o) 


PjJ($  Jp^S/f (?  )  )B(R/f(g)tf>nott)  dfdi^ 


f^n^nin*  (W^V 

^<8*Vn>  ]  Pn0U0)  <?*  *  ao)*’oc^P|S^*)H(«t.?**,1o»t)dfdao 

~E7VtTj*i  JWf(^J 


r*f  («) 


f 

! 


4.  yv»<<^v"vv«^v.vvn  [] 

-  *  t- 


(2.93) 


0 


Kota  that  tha  sacoad  term  la  (2. 93)  rapraaanta  a  concentrated 
deaaity  for  failures  with  SsB^,  The  third  tara  exists 
only  whan  R>H*(t1),  i.e. , 

R>  aax^jj,  R^tf)/f'(t1t-(tf-ti)tiJ/t)|  .  (2.94) 


For  a  population  without  initial  cracks  ,  the  «c  integrations 
in  (2.8t)  can  be  transforaad  and  the  order  of  integration  rearranged 
so  that. 


FCt)  a  J  p^CRJr  j  (8)  exp^-r  j  (R)  t  j  dR.F^  ( t^) 

«P 

t* 

4-  r2(R) 

J»  J  ~ W5 


■in 


£l  P^MBC*  ,{*,Q,t)pQ(f  )d* 
X 


♦  1  P/VW11^^  )E(H/y(tf)  ,5f,o,t)dR. 

J8*(0)  yUf)t 

where  R^(0)  is  given  by  (2*90)  with  agaOtl.e. , 

Rj(0)*«ax{RItlll,Bpf(^)/ir(?fttJ/t^  . 


(2.95) 


C2.96) 


SI 


2.2.10.  The  probability  of  failure 

Equation  (2.5)  provides  a  trivial  naans  of  computing 
P_(t)  gi van  a  vain#  for  Pg(t)  and  there  appears  to  ba  no  need 
to  derive  an  Integral  expression  for  the  probability  of  failure. 

However,  the  numerical  evaluation  of  expressions  such 
as  (2.59)  and  (2.60)  is  difficult  when  P£(t)  2r  1.  To 
obtain  meaningful  estimates  of  P^(  t)  near  unity  the  numerical 
integration  must  be  computed  to  an  accuracy  of  several  significant 
digits.  A  better  approach  in  such  cases  is  to  evaluate  the 
Integral  expression  for  Py(t)  and  use  (2.5)  to  obtain  P4Ct). 

In  the  practical  application  of  reliability  analysis  to 
fatigue,  it  is  normal  to  concentrate  interest  on  situations 
where  the  risk  rates  are  very  small  and  Pg(t)~  1.  Thus,  although 
the  Integral  expression  for  P^(t)  is  fundamental  for  the  derivation 
of  expressions  for  other  reliability  functions,  it  is  not  used 
directly  in  RERP.  Instead,  the  expression  for  Py(t)  is  evaluated. 

It  assumed  that  IfXBJ  will  not  be  applied  to  situations  where 
the  probability  of  survival  is  very  small  (less  than  0.01  say) 
and  no  provision  has  been  made  for  this  ease. 

The  Integral  expression  for  Pp(t)  corresponding  to 
(2.39)  is  (see  Mallinaon^  ), 


[(1  -  H(x,t»|Lj(2 

,)dj|+|(1  -  H(x,t))p3t(x)dx4‘jpx(j)dx 

D1 

°2  S 

.  (2.98) 

Py(t)s 


The  third  term  in  (2.98)  is  an  integration  over  the  aubspace 


Dj  which  contains  all  thoae  structures  that  have  satisfied 
a  failure  criterion  (such  as  nlnimun  strength  or  finite  fatigue 
life),  or  have  been  rejected  by  a  previous  inspection. 


Referring  to  figure  2.7»  the  third  term  in  (2.98)  for 
initially  cracked  structures  is  represented  by  three  teras; 


the  first  two  teras  cover  the  regions. 


nQsp<tf  ,  -«*<*<* 


(2.99) 


t  (J<«o  -• 


(2. tOO) 


respectively  for  nQ  <  td»  The  third  term  accounts  for 
all  structures  for  which  td<nQ  .The  expression  for 


PF(t)  is. 


f*  r 

PF(t)*  1  P„  u0>  Pgi/S)  •  (1  -  H(a,p,n0,t))P-tU)dad^dnc 

~  Jt,  “0  J«n  F 


'“o  r  * 

t*  * 

rt.  #ot 


rrf  (“■  . ..  ] 

VnJ'oU  Pp({l)  VU)dVP(tf)j  % 

t.  J  an  J-«o 


*  p.  (td) 

“o  d 


(2.  101) 


(The  second  term  in  (2.101)  includes  the  two  teras  described 
by  (2.99)  and  (2.100)) 


equation  (2.101)  applies  for  tiae  following  an  inspection. 

All  structures  removed  during  inspections  are  included  in  the 

integral  expression  for  Pf(t)  so  that  the  resulting  • a tin  ate 

for  P.(t)  does  not  Include  any  replaceaeat  structures. 

& 


ri«u ra  2. 7.  Sebaaatic  rapraaantatioa  of  tba  D^Dj 
booadary  for  <lToa  a#  whoa  iaeladoa 
fallad  atnxctoraa  to  cat bar  with  tboaa 
rajaetad  by  praaloaa  iaapaetlona. 

Alao  indtcatad  art  tba  radons  cots  rad 
by  tba  first  two  tarma  rapraaantiac 
Dj  la  Pp(t)>  (aqoatloaa  2.99  aad  2.100 
daflaa  tba  Halts). 


For  a  population  without  initial  cracking  the  expression 


for  PyCt)  is, 


PF(t)  a 


-  exp£-  r^atjtijda  .  P^Ct^)  +. J  pp^C«.)  d«c 

-#  HP  ^ 

f 

It  U  “  H(#c*P»®»t>>P^4wif 


The  total  fraction  of  the  population  removed  daring  an 

inspection  is  called  the  probability  of  detection  and  is  defined 

by  equation  (2.49).  Normally,  the  Integral  expressions  for 

Pg(t)  or  Pji(t)  evaluated  before  and  after  the  inspection 
•> 

can  be  differenced  to  yield  the  probability  of  detection. 
However,  NSHF  offers  a  simplifying  approximation  (see  Section 
3.6.2)  whereby  the  probability  of  survival  is  computed  via 
equation  (2.10)  from  the  total  risk  rate.  For  this  case,  an 
integral  expression  for  the  probability  of  detection  mast 
be  available. 


To  derive  a  suitable  expression,  recall  equation  (2.49), 

viz. 

.  ■  piU)'P5(t)' 

where  P^(t)  is  simply  the  probability  of  survival  at  t»tij^, 
with  the  limits  of  integration  being  dependent  on  the  last 
inspection  time,  ti^.  Pg(t)  is  obtained  by  replacing  ti^  in 
the  limit  equations  by  t,  the  current  inspection  time,  so  that. 


«'**'  (Vftl)  rt.Uf.5dJ 


(2. 103) 


and  (■(<"*■ 

twj  > 


&  max 


The  expression  for  the  probability  of  detection  is, 

f  pa0(a0>l  f  f . 

U*Q 

.ain[tf,td^ 

*1  P^<£>  »*o.t)<Wd^|dno 

J  nQ  sax 


•  •  •  • 


(2.  105) 
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The  tern  in  square  brackets  la  (2.105)  covers  the  area  showa  la 
Figure  2.8.  The  iategratloa  can  be  rearraaged  to  yield, 


Pdet(tiJ+1)s’ 


PaQ(a0) 


sp  /W 

p^a)  H(*C,  f  ,  »Q  •  t)  d*d/3 


*>• 

ftf 

' 00  - 

L 

jt. 

p  (»t)H(a,p,n0,t)d<df 
•  ^ 

*>  - 

dnQ  . 


(2. 106) 


Similarly  for  a  population  without  Initial  cracking. 


'Vr^ 


pdet(tl3+r  = 


P?(p) 


V1 

ftf 

L  Vf> 

J  t.. 


P||lU)HU,p,0(t)*ULP 


H^.ji.O.tJp^UOd^d/J  .  (2.10?) 


Note  that  there  Is  no  contribution  to  <2. 107)  arising  from 
on cracked  structures.  An  iaspectioa  based  on  a  crack  length 
criterion  will  not  reject  on cracked  structures.  A  proof  load 
test  eill  reject  uncracked  structures  at  the  first  Inspection 
only.  For  this  Inspection,  the  term, 


A 


W 


p^UOexp^-  rjfc)^  da  must  be  added  to  (2.107) 


R 


■in 


Figure  2.8.  Area  in<*^  space,  for  given  nQ,  representing 
the  probability  of  detection. 

The  area  can  be  divided  into  two  teras. 

\  \  \  tern  1 


/  / /  term  2 


(  equation  2. 106). 


Note  that  this  argument  used  to  derive  the  probability 
of  detection  ignores  the  effect  of  the  removal  function  for  a 

crack  length  inspection  (2.2. 6),  In  general  the  density  function 

# 

p^jf),  (remembering  that  it  is  replaced  by  p^(£)  defined  by  (2.55)), 
changes  with  each  inspection.  The  probability  of  detection 
given  by  equation  (2.106)  accounts  for  only  those  structures 
that  have  cracks  with  lengths  greater  than  ad.  Additional 
terms  representing  the  effect  of  the  removal  function  would 
have  to  be  included* 

The  complete  expression  for  Pdet(ti..)  has  not  been  incorporated 
in  the  NERF  computer  program  because  equation  .(2.106)  is  used 
only  when  the  simplifying  approximation  described  in  Section  3.6.2 
is  invoked.  For  the  case  of  Inspections  involving  the  removal 
function,  the  probability  of  detection  must  be  evaluated  by 
taking  the  difference  between  Pg(t)  before  and  after  the  inspection. 


3.  DETAILED  SPECIFICATIONS  FOB  THE  MODELS  EVALUATED  BY 


aLULj 


In  the  previous  Chapter,  the  mathematical  baaia  for  the 
most  general  reliability  functions  evaluated  by  the  NERF  computer 
program  was  presented.  The  resulting  expressions,  although 
detailed,  require  further  processing  before  a  complete 
numerical  specification  and  description  of  the  operation  of 
NERF  can  be  made. 

There  are  two  areas  in  which  the  general  expressions 
are  incomplete. 

(i)  The  effects  of  certain  characteristics  and/or  limitations 
of  the  input  data  require  explicit  enunciation. 

(il)  A  useful  function  of  NERF  is  the  evaluation  of  models 
which  are  simplifications  of  those  described  in  the 
previous  Chapter,  either  as  the  result  of  neglecting 
the  variation  in  one  or  more  of  the  basic  random  variables 
or  by  making  approximations  which  significantly  reduce 
the  complexity  of  the  analysis. 

It  is  not  necessarily  true  that  expressions  neglecting 
variations  of  a  given  random  variable  can  be  deduced  in 
an  obvious  way  from  the  most  general  expressions.  It 
is  therefore  necessary  to  carefully  examine  each  simplification 
and  generate  an  appropriate  set  of  reliability  functions. 
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It  la  the  function  of  this  Chapter  to  complete  tho 
genaral  expressions  and  provide  specifications  for  all  tho 
fadlltlas  provided  by  tba  eoapatar  prograa. 


The  HERF  computer  program  has  been  written  so  that  the 
variations  of  any  combination  of  the  basic  random  variables 
can  be  neglected  from  the  analysis.  If  each  possible  combination 
is  regarded  as  a  separate  model,  8  sets  of  reliability  functions 
require  specification.  Moreover,  the  fact  that  zero  Initial 
crack  length  represents  a  special  ease  of  neglecting  the  variation 
of  Xg,  increases  ths  model  count  to  12.  Fortunately  it  is 
possible  to  classify  the  models  in  such  a  way  that  only  4 
sets  of  reliability  functions  need  specification. 

The  classification  is  made  according  to  the  status  of  the 
random  variables  Xj  and  Xy  representing  comparative  fatigue 
life  and  relative  residual  strength  respectively.  There 
are  4  possibilities^ and  for  each  model  thus  identified, the 
initial  crack  length  random  variable,  Xg,  can  have  have  status  equal 
to  one  of  the  following: 

(i)  t^k  Xg<  tf  with  density  function  p^  (xg); 

(li)  Xg  *  constant,  £  0; 

(ill)  X,  =  0,  corresponding  to 

Thus  each  class  includes  the  two  groupings  identified 
in  the  previous  Chapter,  tuaely,  initial  cracking,  (1)  and  (ii), 
and  no  initial  cracking,  (ill). 


The  general  expressions  derived  la  the  previous 
Chapter  all  belong  to  the  saae  class,  (variations  In  both 
Xj  and  Xj  Included).  Each  reliability  function  for  the 
full  Initial  cracking  model  (variations  In  Xg  Included)  can 
be  written  In  the  fora 

(-2 

f(t)sj  pno(n0)f(t,n0)n0  .  (3.1) 

For  constant  nQ,  the  saae  reliability  function  Is  represented 

by  f(t,nQ).  If  the  definition  of  f(t,nQ)  Includes  extra 

terms  representing  the  behaviour  of  un cracked  structures 

when  nQ  =  0,  It  can,  together  with  expressions  for  n}  and  ng 

be  used  as  a  specification  for  that  reliability  function 

for  the  three  states  for  X_. 

^6 


For  exsaple,  the  function 


p^U.)  BU  ,|J ,  nQ ,  t)  dadp 


(3.2) 


where  a 

H(o<,(l,n0,t)  *  exp  ^  -t/U  -  ^filn  ,0)r.(*)y  r2(*,pit)<i(H  \ 

L  Wv-rf 


...  (3.3) 


together  with  n^  *  t^  and  n2»|^  provides  a  complete 
specification  for  Pgtt),  replacing  (2.59)  end  (2.60). 
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The  reliability  functions  for  a  given  class  are 
defined  in  terms  of  functions  for  given  nQ  as  set  out  below. 

(i)  Probability  of  survival 

PgCttng)  is  found  such  that  for  the  full  initial  crach 

•S’ 

model, 

2 

P£(t)‘j  ps(t,a°)p»o(,lo>dao  *  (3,4> 

(ii)  Probability  of  failure 

If  Pg(t,n0)  is  the  probability  of  failure  for 
constant  nQ,  that  for  the  full  initial  crack  model  is, 

f“2  r 

PyU)*  P-U.ngjp  Ca0)to0i'  «V°0  .  (3. 5) 

0 

Dote  that  the  limits  a1  and  n^  ,  in  general,  differ 
between  functions. 

(ill)  Probability  of  detection 

The  probability  of  detection  at  constant  nQ  is 

Pdet(t*aO}  *°  that» 
fn2 

Pdet(tH  PdetU»a0)PnoCVto0  * 

Jn, 


(3.6) 
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The  risk  rate  la  broken  into  4.  components; 

the  rids  of  static  failure  by  fatigue  r  (t,!^), 

the  risk  of  fatigue  life  exhaustion  (arniimum  strength)  rf1(t,n0), 

the  rids  of  fatigue  lifs  exhaustion  (life  limit)  rf2(t,n0) 

and  the  virgin  risk  r^(t) . 


The  first  three  eoaponents  bear  the  ease  relationships 
to  those  for  the  full  initial  crack  aodel  as  expressed 
by  equation  (3. 1  )•  The  fourth  is  valid  only  for  nQ  -  0. 


The  density  function  for  the  tine  to  failure  can 
also  be  split  into  four  eoaponents. 


Pfs(t»no)sPS(tKra  (t*V  » 

(3.7) 

*ffi(t,VmVt)rfi(t*V  * 

(3.8) 

Pff2^*n0^  a  PS^rf2^*,n0^ 

(3.9) 

and 

Pfr(t)  *  Ps(t)rT(t)  . 

(3. 10) 

In  equations  (3*7  -  3.10)  Pg(t)  is  the  probability  of 
survival  relevant  to  the  current  nQ  status,  i.e.  if 
nQ  is  constant  Ps(t) a  Ps(t,nQ). 

In  practice,  Integral  expressions  for  P^fl(t,n0),  p^(t,  V 
Pff2^t,n0^  *n<*  Py^  *r*  °^1>dLaed.  The  eoaponent  risk  rates 
can  be  obtained  via  equations  (3,7  -  3.10).  The  total 


dale  rat*  la  than  given  by, 


r(t)sJ  pf(t,n0)dn0 /Ps(t)  (3.11) 

«h*r* 

pf(t,V  s  r(n0.0)pfv(t)^p£a(t,n0)^pff1(ttn0) 

+  pff2^*,a0^*  (3.12) 

(v)  Density  for  atrsaxth 

*  PgCtipiall^t,^)  (3.13) 

than 

fm2 

PgdlF^t)  .  j  ta( t,^)»  *§(t)  (5*14) 


(iv)  danalty  for  atranath 

Although  an  aquation  similar  to  (3.14)  can  ha  writ tan 
for  Pg(fi|t),  an  alternative,  la  taraa  of  functions 
already  daflnod  above  can  be  darlvad.  This  altarnativa 
expression  leads  to  computational  affldanej  by  reducing 
the  number  of  Integrations  that  have  to  b*  performed  to 
gen* rata  a  complete  set  of  reliability  functions. 


i 

J 


For  a  given  das*  the  9  functions,  PjS(t,a0)  »  Pp<  *»“()> 

Pd»t^,aO^  *  pff1^,,,0^,  ptt 2^*a<P*  Pfr^»no^  ^H^8*** 

and  fs  f2(BftfnQ)  are  defined  by  Integral  expressions.  ill  other 

reliability  functions  can  be  expressed  In  terse  of  these  nine. 
The  limits  nf  and  nR  are  required*  In  the  ease  of  the  full 
Initial  crude  model,  for  the  functions  Pg(t),  PF(t),  Pd#t(t), 
r8(t),  rf(t)  (»rfl(t)*rf2(t)  )?pB(H|F>t)  and  pR(B|t). 
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3.2.  Input  Data  Specifications 

Before  the  classification  method  described  la  the 
previous  section  can  be  applied  to  the  general  reliability 
functions,  it  is  appropriate  to  consider  the  properties  of 
the  data  upon  which  the  reliability  analysis  will  be  based. 

In  particular,  limits  imposed  by  the  data  may  have  repercussions 
in  terms  of  the  equations  defining  the  limits  of  integration 
in  the  various  reliability  expressions. 

This  consideration  is  presented  here  in  the  fora 
of  specifications  for  the  input  data  for  the  HEHF  computer 
program.  In  addition  to  the  specifications,  example 
data  will  be  described.  These  data  define  two  populations 
of  structures  and  applied  load  sequences  which  will  be  used 
to  demonstrate  various  aspects  of  the  methodology  and  computer 
coding  as  the  need  arises. 

The  first  set  of  data  pertain  to  an  idealised  set 
of  structures:  the  input  functions  have  relatively  simple 
forms.  This  set,  referred  to  as  'example  A'  will  be  used 
predominately  for  models  without  Initial  cracks. 

The  second  set  of  data  is  more  typical  of  an* aircraft 
fleet  and  will  be  used  as  input  data  for  lntlal  crack  models. 

It  will  be  referred  to  as  'example  B*. 


The  relationship  between  crack  length  end  tine  la 
assuaed  to  be  specified  by  a  function  which  represents  the 
average  behaviour  of  the  population  of  structures.  This 
function, 

asa(t)  (3.18) 

Is  defined  for  values  of  the  argument,  median  time  or 

age,  in  the  interval  [t^***]  where  t.  is  the  median  Initiation 

time  and  tf  the  median  fatigue  life  for  the  population. 

It  Is  an  Important  feature  of  the  KERF  computer 
program  that  this  function,  together  with  other  Input  functions. 
Is  defined  by  a  set  of  ordered  pairs  of  argument  and  function 
value  without  recourse  to  functional  forms.  The  ordered 
pairs  are  assumed  to  be  such  that  a  cubic  spline  fitted 
through  them  defines  the  continuous  curve  representing  the 
function  to  an  acceptable  degree  of  precision. 

The  crack  growth  functions  for  the  two  examples  are 
shown  In  Figures  3.1  and  3.2.  The  data  for  example  A 
was  obtained  by  assuming  that  (3. 18)  was  the  solution  of, 

a  Ca3  (3.19) 

such  that  when  40 0  hrs  as  9.  1mm;  when 't  *"tf  =  4200hra 

a  ».  0.41mm.  The  resulting  function  Is, 

a -6.164/(4176  -  0.94t)*  . 


(3.20) 


r/ 


The  data  points  indicated  in  Figure  3.1.  are  defined  by 
equation  (3. 20):  the  curve  is  the  cubic  spline  fitted  by  KERF 
through  the  points.  Note  that,  as  illustrated  by  this  example, 
the  initial  crack  length  a(t^)  can  be  non-zero. 

The  data  for  example  B  represent  a  'best  fit'  curve 
for  measured  crack  growth.  It  is  not  necessary  that  the 
precise  form  of  the  function  is  known. 

A  requirement  of  the  reliability  functions  is 
that  the  inverse  crack  growth  function  is  available,  l.e., 

t  *  a** * ( a)  (3.2D 

for  aiaff  where  a(l^)  and  a^.  a( t^) .  This  function 

is  obtained  by  solving  (3. 18)  for  t,  given  a.  Inverse  Interpolation 
is  not  used  because,  in  general,  the  Inverse  interpolating  function 
is  not  identical  with  the  forward  interpolating  function.  The 
procedure  used  by  1ERF  ensures  that  the  difference  between 
a  given  value  of  t  and  a”^(a(t))  can  be  made  to  be  insignificant. 


3*2.2.  Strength  decay  function 


The  relationship  between  crack  length  and  strength  is 
assumed  to  be  defined  for  the  median  structure ,  via. 

fi  =£(a)  (3*22) 

over  the  Interval  [a ^,a^j which  does  not  necessarily  coincide  with 
Cai»*fl*  For  *<*!»  S«B(a^)  and  for  a>ag»  BxSCsg). 

As  was  the  ease  for  the  crack  growth  function,  the  strength 
decay  function  is  defined  by  a  set  of  ordered  pairs  which  are 
used  by  NEBF  to  establish  a  cubic  spline  representation  for 
B(a). 


The  strength  decay  function  for  example  A  is  shown  in  Figure 
3.3.  This  function  is  of  the  form, 

2»«1.a*i  (3.23) 

with  ej  chosen  so  that  S(a^)«  100  ,l.e. , 

S»31.623*~*  for  a&  Co.  1,1).  (3.24) 

The  corresponding  function,  derived  from  experimental 
data,  for  example  B  is  shown  in  Figure  3.6. 

The  strength  decay  function  is  used  to  generate  the 
relative  strength,  function,  y(t)  ,  (equation  2.23).  Oils 
function  is  defined  by  a  set  of  ordered  pairs  of  t  and  'f'(t) 
where  the  values  of  t  are  the  same  as  those  used  to  define 
the  crack  growth  function.  y*(t)  is  thus  defined  over  the 


interval  . tf] .  For  f*1  and  for  t>tf,  f-  0. 


The  derived  relative  strength  functions  for  the  two 
examples  are  shown  in  Figures  3.7  and  3.8.  Note  that  the 
function  for  example  B  has  nearly  zero  first  derivative  for 
t'Vt^.  In  order  to  prevent  numerical  problems  when  defining 
the  inverse  function,  ),  linear  interpolation  Is  used 

for  t <  t\j  where  tj  is  t  value  of  the  last  definition 
point  (or  node)  for  which  <p> 0.9. 


in  inverse  function  is  defined,  either  by  linear 
Interpolation  for  t^  <  t  <,  t ^  or  by  solving  the  equation 
t)  for  t  using  the  cubic  spline  for  t  >  For  y  >  1, 
t  a  t±  and  for  f  <.f(tf)  f  t*tf. 


The  derivative,  is  generated  by  differentiating 

at 

the  interpolation  function  (either  linear  or  cubic  spline) 
directly.  For  t  <  t±  and  for  t.<  t  +>'z  o. 


The  risk  rata  for  a  structure  of  given  strength,  R,  is 
related  to  the  probability  of  load  exceedence,  defined  by  equation 
(2.2 0),  viz, 

rk(S>  *  VB>1r  *  (3.25) 

The  specification  for  P^(H)  can  also  be  regarded  as  a  specification 

mm 

for  i^(B):  if  l_a  1,  the  two  functions  are  identical.  The 
function  Pl(B)  is  assumed  to  be  defined  by  a  set  of  ordered 
pairs  of  R  and  Pj^B)  for  B  8ain  is  the  first 

node  for  P,  (R)  and  defines  the  aininua  value  of  strength.  R _ 

is  BOX 

is  the  maximum  value  of  load  la  the  applied  sequence  and 
corresponds  to  the  last  node  in  the  definition  of  PL(B). 

The  function' P^(B)  and  the  load  application  rate  lr  are 
used  by  SERF  to  define  rJc(B),(  some  times  referred  to  as  the 
load  exceedence  rate)  via  equation  (3.25).  Interpolation  is 
obtained  by  taking  the  natural  logarithm  of  r^B)  for  each  of 
the  nodes  and  fitting  a  cubic  spline  through  the  resulting  ordered 
pairs. 


The  probability  of  load  exceedence  for  example  1  is, 

Pl(R)  -  exp  {,-2.303(8  -  30)^  (3.26) 

corresponding  to  a  density  function  for  load  application, 

PL(R)  m2.303*xpi-2.303(B  -  30)j  (3.27) 

for  30<R4.t10  .  With  lf  a  TO, 

rk(R)  »  TOexp  [-2.303(8  -30)]. 


(3.28) 
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Shis  function  is  shown  in  Figure  3.9.  Oie  nodes  are  at 
R  3 30  (tO)  1T0  and  the  interpolating  polynomial  is,  of  course, 
linear  for  log(r^(R)).  Rote  that  although  the  interpolation 
within  5ERF  uses  natural  logarithms,  the  functions  are 
plotted  after  taking  logarithms  to  base  10. 

A  typical  function  based  on  experimental  data  is  used 
for  example  B  and  is  shown  in  figure  3* 10.  Rote  that  the 
distribution  deviates  from  exponential  for  small  values  of 
R  only.  For  this  function  lr»  5 00  000. 


3.2.4.  Inspection  removal  and  crack  detection  functions 


The  crack  length  inspection  removal  function  S(ot,p ,t,tij) , 
(Section  2.2.6),  defined  by  equation  (2.52)  can  be  written  in  the 
form 

SU,|5,n0,t,tii)-!,H^(t<1-ii0)t/ti;J^n0-p).SJ(t)  (3.29) 

where 

t  *  nQ+(p  -  n^tij/t  .  (3.29a) 

The  effect  of  the  unit  step  function  is  taken  into  account 
by  the  integration  limits  in  the  expressions  for  the  reliability 
functions.  The  function  S^(t)  which  remains  invariant  with  respect 
to  the  inspection  sequence  is  specified  by  defining  a  function 
Cd(a)  called  the  crack  detection  function.  This  function  is 
specified  by  a  sequence  of  ordered  pairs  with  a  in  the  interval 
(p.a^}  where  ad  is  the  crack  length  beyond  which  the  inspection 
is  assumed  to  be  perfect.  Cd(a)  has  the  general  form  shown  in 
Figure  3.11. 

Cd(a)  is  analogous,  in  fact,  to  a  cumulative  probability 
of  detection  for  crack  length.  The  term  crack  detection  function 
has  been  used  here  to  remove  confusion  with  the  probability  of 
detection  defined  in  Section  2.2J1. 

KERF  makes  the  conversion  from  C.(a)  to  S.(t)  via  the 

d  j 

relationship, 

Sj(t)  *  1  -  Cd(a  (t» 

so  that  Sj(?)  has  the  general  form  shown  in  figure  3.12. 


(3.30) 


The  function  S^(t)  is  thus  defined  by  a  sequence  of  ordered  pairs 
of  t  and  Sy  where  the  values  of  t  correspond  to  the  values 
of  a  used  to  defined  Cd(a). 

The  definition  of  Cd(a)  is  used  by  NERF  to  set  values 
for  ad  and  td^(a_1l(ad)).  Provision  ia  made  ®d  to  be  specified 
independently,  in  which  case  the  inspection  process  is  assumed  to 
be  perfect  and  the  specification  of  Cd(a)  is  ignored. 

Note  that  C,(a)  need  be  defined  over  only  a  limited  range 
d 

of  a.  For  values  of  a  outside  and  less  than  the  lower  limit  of 
this  range  Cd<a)  is  assumed  to  be  zero. 


3.2.5.  Density  functions  for  the  basic  random  variables 


lb*  density  functions  for  the  basic  raadoa  variables 
(comparative  fatigue  life,  initial  crack  length  and  relative  residual 
strength)  are  assuaed  to  be  continuous  and  dependent  on  at  aost 
three  parameters  la  the  following  w ay. 

BKBF  provides  a  library  of  standard  probability  density 
functions  which  are  defined  by  a  single  dispersion  parameter  for 
a  standard  raadoa  variable,  Z  say.  Currently  this  library  contains 
three  density  functions: 

(1)  log  normal, 

P2(*)»  _L.  e^p^-i(log(*)/k32i  ;  (3.31) 

zSSar 

(11)  extreme  value, 

Pz(z)  »  kzlK"'1expt-**$  and  (3.31a) 

(111)  gamma, 

Pz(z)  ».  z^exp^-zJ/rOs)  .  (3.31b> 

In  each  function,  k  is  the  dispersion  parameter. 

Inch  basic  raadoa  variable  Is  relatsd  to  the  standard 
raadoa  variable  by  an  equation  of  the  fora, 

£  -  U  -  •)/▼  (3.32) 

where  v  and  e  are  called  the  le cation  and  alalaua  value  parameters 
respectively. 
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For  each  basic  random  variable ,  tho  density  inaction  Is 
completely  specified  by  selecting  the  appropriate  standard 
inaction  and  defining  the  dispersion,  location  and  minimum 
value  parameters.  The  specifications  for  the  two  example 
problems  are  presented  In  table  3* !• 


Of  importance*  in  so  far  as  the  reliability  functions 
are  concerned  Is  that  each  density  function  will  be  significant 
over  a  restricted  range  of  its  argument,  normally 
the  range  of  a  random  variable  will  be  found  by  REBF  and 
will  be  defined  by  the  values  beyond  which  the  density  Is 

Q 

less  than  some  small  value,  typically  10  .  Alternatively, 

the  range  may  be  restricted  as  part  of  the  definition  of 

e 

the  Input  data.  This  Is  particularly  true  for  initial  Crach 
length  when  the  range  is  restricted  by  some  Inspection  procedure 
prior  to  the  commencement  of  life.  For  such  eases,  the 
density  function  Is  normalised,  thus  for  Xg  say. 


*Xg(x2U 


P’ 


max  i 


(3.33) 


where  pj.  (Xg)  Is  the  density  function  defined  by  the  input 
parameters,  and  x^g^and  ^2,max  are  the  defined  extremities 
of  the  range  for  Xg. 


(Note  that  the  current  version  of  the  computer  program  applies 
this  normalising  procedure  to  the  density  function  for  Initial 
crack  length  only.) 


/ 


Random 

Variable 

Type 

Dispersion 

(k) 

Location 

(v) 

Min  value 

(e) 

A 

Comparative 
Fatigue  Life 

log 

normal 

0.2 

0.0 

0.0 

Pi 

Relative 

Residual 

Strength 

extreme 

value 

10.0 

1.0 

0.2 

Comparative 
Fatigue  Life 

log 

normal 

0.2 

0.0 

0.0 

B 

Relative 

Residual 

Strength 

extrema 

value 

6.0 

1.0 

0.6 

Initial 

Crack  Length 

Camaa 

■  •  - - 

3.0 

_ 

120.0 

1.0 

Table  3.1 


Specification*  for  the  density  function* 
used  in  the  example*. 
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3.2.6.  Model  parameters 

The  reliability  functions  depend  on  several  parameters, 
in  addition  to  those  which  define  the  probability  density 
functions,  sons  of  which  are  defined  as  separate  parameters  and 
some  as  Integral  parts  of  the  median  functions.  The  various 
parameters  and  their  methods  of  definition  are  described  below. 

(1)  HqI  Median  virgin  strength 

The  median  virgin  strength  is  an  Independent  parameter 
for  the  analysis  and  has  the  effect  of  specifying  the 
transformation  from  Xj,  (relative  residual  strength),  to*  , 
(virgin  strength),  l.e. 

ec  s  HqXj  .  (3>34) 

Equation  (3.30)  allows  the  density  function  for  virgin 
strength  to  be  defined, 

p.U)=Px  (*/iQ)/X0  (3.35) 

If  the'  variation  in  is  neglected,  RQ  defines  the 
virgin  strength. 

(il)  lp:  Average  load  application  rata 

The  average  load  application  rate  is  an  independent 
parameter  which  completes  the  specification  of  the 
relationship  between  the  probability  of  load  exceedance  and 
the  risk  rate,  equation  (3.25).  Xa  effeet,  1.  determines  the 
time  scale  for  the  reliability  model. 


(ill)  Minimum  value  of  strength 


Bmln  18  defined  by  the  first  node  of  the  sequence  of 
ordered  pairs  defining  the  probability  of  load  exceedance. 

It  Is  Interpreted  by  STERF  as  the  minimum  value  of  strength 
below  which  structures  can  not  exist. 

(iv)  Kaaxs  M«nrimn»  value  of  strength  subject  to  risk 

Is  defined  by  the  last  nods  of  the  probability  of 
load  exceedance.  For  H>Ra#x,  ^sO,  This  parameter  has 
the  effect  of  limiting  the  Integration  domains  for  the 
reliability  functions. 

(v)  Rp!  Proof  lo«d 

Rp  is  an  Independent  parameter  which  defines  the  criterion 

for  proof  load  Inspections  where  all  structures  with 
R<Rp  are  removed.  If  RpiO,  no  proof  load  inspections 
occur. 

(vi)  t^:  Median  crack  initiation  time 

t^  Is  defined  by  the  first  node  in  the  erak  growth  function 
and  usually  denotes  the  defined  median  crack  initiation  time. 
However,  SERF  assumes  the  added  interpretation  that  t^  denotes 
the  age  at  which  structures  start  to  experience  a  risk 
as  a  result  of  cracking.  For  example,  If  JjSSq  sad  Rn>  RM<|y> 
structures  will  commence  experiencing  a  risk  rate  for 
t>y,,(R||<g/fr<?)»  This  defines  an  effective  value  for  t^  which 
overrides  a  smaller  defined  value. 


93 


(vii)  t?:  Median  fatigue  life 

tTj  Is  defined  by  the  last  node  In  the  crack  growth  function 
and  determines  the  aedlan  Halt  for  age.  ill  structures 
which  reach  an  age  equal  to  t^  are  deeaed  to  have 
failed.  The  question  of  fatigue  life  Halting  Is  condsidered 
In  detail  In  the  following  Section. 

Cvili)  Sq  aax‘.  MhwImmm  intlal  crack  length 

For  a  aodel  in  which  Sq  (or  nQ)  is  allowed  variation,  a^^^ 
la  an  independent  paraaeter  which  specifies  the  upper 
Halt  for  Initial  crack  length. 

e 

If  Bq  is  not  allowed  variation,  ag^^  deteralnea  the 
constant  value  of  Uq#  and  nQ  via  iig  s  I* 

art  »0,  SERF  selects  the  non-initial  crack  version  of 

V^UZ 

the  current  class.  (Note  that  Ugf.  t^  corresponds  to 
a'^O)  so  that  a  non-initial  crack  aodel  actually 
corresponds  to  n^  4 1^  rather  than  just  n^s.  o.y 

(la)  a^s  Crack  length  inspection  criterion 

ad  is  an  independent  paraaeter  which  defines  the  criterion 
for  a  crack  length  Inspection.  The  age  Halt  used  in  the 
no dels  is  ?£  where 

td  a-1(ad)  .  (3.36) 

For  a  aodel  with  no  crack  length  inspections,  td^^. 

If  ad  is  specified  as  zero,  then  a  crack  detection  function 
must  be  defined. 


A  summary  of  the  model  parameters,  their  definitions  and 
values  for  the  two  examples  is  presented  In  Table  3JL. 


Symbol 

Name 

Definition 

Example  A 

Example  B 

so 

Median  virgin 
strength 

Independent 

TOO 

230 

Xr 

Average  load 
application  rate 

Independent 

10 

500  000 

Bmln 

Minimum  value  of 
strength 

first  node  of 
PL(H) 

30 

20 

R.ax 

Maximum  value 
of  strength 
subject  to  risk 

Last  node  of 

pl(b> 

110 

180 

BP 

Proof  load 
limit 

Independent 

*1 

Median  crack 
initiation  time 

first  node  of 

a(t) 

400 

1 

*f 

Median  fatigue 
life 

Last  node  of 

a(t) 

4200 

2.37 

*0,max 

Maximum  initial 
crack  length 

Independent 

0.05 

ad 

Crack  length 

inspection 

criterion 

Independent 
or  last  node  of 
Cd(a). 

Table  Summary  of  model  parameters  and  their  values  In  the 


two  sets  of  example  data, 


3.2.7.  Fatigue  life  Halting 


An  assumption  made  by  all  the  reliability  models  evaluated 
by  NKRF  la  that  each  structure  has  a  fatigue  life  Halt  given  by 
the  tine  of  transition  from  D2  (cracked  tine  tone)  to  0^ 

(failed  tine  zone).  The  nodel  equations  developed  In  Section 
2.2.3  can  be  used  to  derive  an  expression  for  this  Halt,  tf, 
by  recognising  that  it  corresponds  to  the  Instant  when  the 
structure  has  either  reached  an  age  of  tf,  or  has  had  Its 
strength  reduced  to  B^  w#  so  that,  (uJVn^  (l-is))^ 

tf  »  x,  (ain  { tf  .^(R^/x^)  -  a"1(x2))})  (3.37) 
Any  structure  reaching  this  fatigue  life  Halt  contributes  to 
the  risk  of  fatigue  life  exhaustion,  rf. 

An  observation  that  can  be  aads  from  equation  (3.37)  Is  that 
structures  with  x^>  ( t^)  have  fatigue  Hfe  Halts  that 

are  Independent  of  the  strength  random  variable,  Xj.  For  these 
structures  the  fatigue  Hfe  Halt  can  be  Interpreted  as  the 
tlae  of  instantaneous  strength  decay  (or  'runaway'  crack  growth). 
However,  this  Interpretation  assuaes  that  only  the  stronger 
structures  experience  runaway  cracking  which  a ay  not  be  the 
case  in  general.  In  fact,  placing  such  detailed  Interpretations 
on  the  aodea  of  failure  of  structures  reaching  their  fatigue 
Hfe  Halts  is  open  to  arguaent  and  the  aodel  needs  careful 
exaalsatioa  In  eases  where  the  risk  of  fatigue  Hfe  exhaustion  is 
dominant. 


the  significance  of  fatigue  life  Halting  for  a 

given  set  of  data  can  be  estimated,  in  the  neai^  by  computing 

the  loss  factor  at  tf  for  a  population  without  variations,  i.e. , 

* 


* 

....  (3.38) 

this  expression  represents  the  fraction  of  a  uniform  population  having 
the  median  structural  properties  that  would  survive  until  tf 
under  the  Influence  of  the  load  sequence  represented  by  PL(B). 

If  this  fraction  is  small  (say  <  lo"**)  then  the  risk  of  fatigue 
life  exhaustion  will  be  an  insignificant  part  of  the  total  risk. 

However,  if  this  term  is  *»•  1  then  the  model  will  be  dominated 
by  failures  due  to  fatigue  life  limiting.  Such  '&  case  will  probably 
represent  a  load  spectrum  which  is  too  weak  or,  as  equation 
(3.38)  indicates,  a  load  application  rate,  lp,  which  is  too  small. 
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3.3*  Data  Limit a  and  Their  Effects 

The  Integration  Unite  appearing  In  the  exp  reset  one 
developed  In  Chapter  2  result  fron  assumptions  Inherent  In 
the  reliability  aodel.  In  practice,  the  Integration  domains 
defined  by  these  limits  nay  include  regions  where  the  Integrand 
is  insignificant.  Although  such  regions  present  no  essential 
mathematical  problems,  Improved  performance  of  the  numerical 
Integration  algorithms  Is  achieved  if  the  Integration  limits 
are  modified  to  explicitly  exclude  these  regions.  The  numerical, 
requirement  for  explicit  exclusion  of  insignificant  regions  Is 
particularly  Important  In  those  cases  when  the  boundaries  appear 
as  discontinuities  in  the  Integrand. 

Modifications  to  the  Integration  limits  arise  from 
the  following  limitations  imposed  by  the  data  specified  in 
Section  3*2. 

(1)  Truncation  of  load  exceedence  probability 

Pt(H)  is  defined  for  B_4  <  H<  H _ _  .  The  lower  bound  for 

H  is  already  incorporated  In  the  reliability  expressions 
via  the  fatigue  life  limit  assumptions.  The  upper  limit 
must  be  lneorje**tsi  in  expressions  where  the  integrand 
includes  PL(B)  as  a  product  tern  as  in  the  calculation 
of  rs(t),  (e.g.  equation  2.75). 
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(11)  Beatrlctlon  of  random  variable  ranges 


The  range  of  validity  for  each  randoa  variable  le 
restricted,  either  by  truncation  or  by  the  fact  that 
the  associated  probability  density  function  is  significant 
over  only  a  restricted  range  of  its  argument.  Accordingly 
the  basic  randoa  variables  are  assumed  to  be  limited 
by 


*l,aln  is  *i  ^  xi,max 

(i*  1,2,3) 

(3.39) 

froa  which  Halts  for  the  transformed  randoa  variables 

can  be  found,  l.e.. 

<*sln  £  «C  £  Bax  , 

(3.40) 

(Jain  £  £  2»  £  max  y 

(3.4*) 

nO,ain  ^  n0  $.  aO,aax 

(3.42) 

The  limits  for  can  be  readily  included  in  the  expressions 
for  n1  and  n2  (see  equation  3. D  ?or  each  reliability  function. 

The  effects  of  the  Halts  imposed  on*,£J  and  K  can  be  understood 
by  constructing  their  positions  in  the (*»(f)  plane  for  constant  n^. 
Typical  juxtapositions  of  the  limit  boundaries  are  shown 
in  figure  3«  13  which  now  replaces  figure  2.5  as  the  basis  for 
the  calculation  of  the  reliability  functions  following  a 
combined  proof  load  and  craclc  length  inspection. 


To  cope  with  the  seeaingly  complex  interaction  of  the 
integration  boundaries,  the  following  conventions  regarding 
notation  and  default  limiting  conditions  are  adopted. 


p 

*•  *  *  f  '(  (<*«».•„  ) 

*"  at*  *?.*.»*  »  ?*■  Pp.lU*!« 

*  **"*«Jl  I  P  :  f  1  (  &n*CbX /*^«w«fc*  ) 

H"  *•  *  i  $  *  ¥  (  ^p  / »*u^x ) 

S’.  A  •  Amiwi  j  f  *  ^  *  (  ^«**n  !***•.*  ) 

/ /  £ xcluud«-<i  ^row.  . 

Figure  3.13.  Typical  Juxtaposition  of  the  various  limit 
boundaries  and  the  subspace  boundaries. 


3.3.1.  Da fault  limit a 


Daaplta  the  apparent  freedom  with  which  the  various  parameters 
in  the  model  can  be  sped  fled,  there  are  certain  limiting  relation¬ 
ships  implied  by  the  model  equations.  Using  primes  to  denote 
input  data  spedfi cations  the  following  sequence  of  equations 
exemplifies  these  relationships  and  defines  new  values  for 
the  various  parameters.  Throughout  the  remainder  of  this 
document  reference  to  these  parameters  will  imply  the  limiting 
relationships. 


B.ax  " 

(3.43) 

Hmin  * 

(3.44) 

(3.45) 

** 

tf  « 

(3.46) 

*d  * 

(3.47) 

^.mln' 

(3.48) 

&  ^ 
0,max 

**•  i  V“o,«u5  1*for* 

1st  inspection^ 

s  min  after  1st  inspection. 
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3.3*2.  notation  tar-  Halt  functlona 

The  following  functions  are  used  to  denote  integration 
Halts  determined  by  the  various  boundaries  Illustrated  in  figure 
3. 13 .  These  functions  encoapass  the  various  parameters  used 
in  Chapter  2  and  have  been  generalised  to  allow  for  the 
effects  of  reductions  in  the  nuaber  of  randoa  variables  in  the 
aodel  as  detailed  later  in  thLs  Chapter. 

The  functions  are  used  primarily  to  delineate  the 
subspace  for  cracked  structures  in*,{*  space  given  aQ. 


(1)  tf  (R) :  Upper  f  bound  for  a  domain  bounded  below  by 

*;<»  *  VW**  o-5°> 

where  0d( nQ)  represents  the  upper  £  bound  resulting  from 
a  previous  inspection,  e.g.  for  the  aodel  described- in 
Chapter  2, 

*  “o  +  <*d  *  *  (3*51) 

Kote  that  defined  by  equation  (2.34) 
corresponds  to 

(11)  <*(1^,0) :  Lower  bound  for  * ,  given  and  n^  for  the  Dg 
subspace. 

*\n^).  ■«*i*ln.HBlB/f/(?).R1>/V(f1(aofjl)))  (3.52) 
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where  da  fin*  a  the  translation  of  the  proof 

load  boundary, 

$  jCbq,*)  »  (?  -  Dq)  tlj/t  .  (3.53) 

ec*  (aquation  £.59)  and  ot*  (£.70)  correspond  to 
ac#(n0,^|)  and  *c(n0,tf)  raspactlvaly. 

(Ill)  S*(n0>^):  Lower  bound  for  R  given  n^  and  ^  for  tha 
D2  subspace, 

R*(n0,f)  a  et*(a^,f)ftf)  (3.54) 

*‘“^«ln^?)*H«ln'V((,,/rr^l(a0^))]  (3*55) 

S*  (£.84)  >  R^Uq)  (£.90)  and  S^^)  correspond 
to  R^nQ,^),  R*(n0,tf)  and  R^t^t^)  respectively. 

(It)  ot^fR):  Upper  bound  for  at  given  (Sand  nQ  for  a  donaln 
bounded  below  by  R  , 

^((S,R)  a.  ■±al^wut,B  /flfi)]  (3.56) 

(v)  o(y*  Lower  bound  for  oL  for  the  0^  subspace  of  uacradced 
structures, 

(3.5?) 

(vi)  ^(n0)  lower  bound  for  @  given  Sq,  for  D2 

f,(V  *  ■“  IvfUA*. 


(3.58) 


(vli)  as  Lower  Halt  for  fi  for  aa  integration  along 
the  line  R  =■  oUfi  (J)  in  D2, 

fp  j  «  aax  (3.59) 

.  • 

where  is  the  solution  of 

S  -  >/*$!<  V0’*  (3.60) 

For  convenient  reference,  these  functions  and  their  definitions 
are  listed  in  Table  3.3. 


t*(R) 

td<V*tux*  f'"1(B/itaax)i 

■“  h*n’ WW^V^i0^*^ 

■“f’ain'*'  <P*aBin*V(p)/^<?i(aO,?)^ 

*p>b 

aaxi^1  (SA  ) ,  |*  P,M 

P*B 

^p.R  801,1  of  B*Bpr<?)/f'(4j>(ao»P)) 

S’? 

■«l«wIWp5 

*1<V 

Table  3*3.  Limit  functions  and  their  definitions, 


3.3*3*  Conditions  for  the  •Hate nee  of  an  Integration  along 
tho  Uns  B«*Kn* 

Sons  of  tho  reliability  functions  involve  integrations 
along  lines  (in  «t ,P  space  for  given  nQ)  of  constant  B* 

Conditions  for  the  existence  of  such  Integrations  can  be 
used  to  define  Holts  for  the  n^  integration.  The  arguments 
presented  here  generalise  the  results  expressed  by  equation 
(2*79)  for  an  integration  along  the  line  R  *  Haia* 

Referring  to  Figure  3. 14,  it  is  dear  that  an  integration 
along  B  will  exist  if, 

Sf'cR^p.B 

or  oin  {  tt ,eBax,  f  ~'(*Amax)]  >  ««4 f  1  (RA^n) 

...  C3.6D 

Equation  (3.61)  can  be  interpreted  as  twelve  separate  inequalities. 
For  a  given  set  of  so del  parameters,  only  one  of  these  inequalities 
will  represent  the  Halting  codltlon  for  the  existence  of  the 
integration. 


Sons  of  the  inequalities  in  (3.61)  are  always  satisfied 
by  the  default  lloit  conditions.  Others,  however,  la pose 
linlta  on  the  ranges  of  tig  and  B.  Taking  the  first  tern  of  the 
right  hand  side  of  (3.61),  the  set  of  conditions, 

W  < 

are  satisfied  by  the  default  Halts.  The  condition 


(3.62) 


yields  a  lower  limit  for  5.  The  condition, 

<■  la  equivalent  to 

Hq  <(t.td  -f W^aJtljJ/Ct  -  ttj)  (3.63) 
for^^ng)  defined  by  (3.31). 

Taking  the  aeoond  term  of  the  right  hand  aide  of  (3.61), 
three  '■ondltions  can  be  combined, 
a  1  a* 

?p,»  <  ?  (3.64) 

where  $  '  »  ain£tf  ,0^^,  f 1  (B/*nax)j  .  (3.65) 

Equation  (3.64)  la  equivalent  to 

R/^($')  >  Hp/fC^^nQ.f')),  which 

for  ^(Uq,^)  defined  by  (3.53)  laada  to 

Hq  <  (tf  t(R^(?')  /R)  -  ^'tij)/(t  -  tlj)  .  (3.66) 

The  condition 

>  ^p,R 

la  equivalent  to 

Oq  <  (t.td  -  ^l(Hf(?d)/ap)tlj)/(t  -  tlj).  (3.67> 

Taking  the  final  term  In  the  right  hand  aide  of  (3*61) 
and  remembering  that 

$1<V  «  ««*tv*min»\i 

the  nontrivial  inequalities  are. 


Pain 


(3.68) 


>  "o  «•»> 

*“  f'W^>  >?&,  •  (3.70) 

Equation  (3*68)  together  with  (3. 63)  yield®, 

aD<(t.?d  -  *«x^"\B/e<ikLa),fBlaJtij)/(t  -  ti^). 

....  (3.7* > 


Now  the  inequality 


^(Rpf ($')/&)  <.  td  implies  that, 

>  $*  eo  that  (3.67)  and 

(3.66)  «re  mutually  exclusive.  Equation  (3.71$  is  relevant 

only  when  (3.67)  may  be.  Equations  (3.66),  (3.67 ^  (3.69)  and  (3.71) 

therefore  be  combined,  _ 

n0<minf  f  '’(R/^ma*),  0  ^[t.mia  {  td,  fc'  >/*>} 

'  ■ialf'.aaxjf ’(H/a^),  1  ( td )/Rp ) , PBjL$*lj'] 

/(t  -  t±3)j 

....  (3.72) 


which  equation  caA  now  be  used  as  a  generalised  definition  for 

f  (R),  which  was  previously  defined  by  (2.79). 

“0 


Equations  (3.62)  and  (3.  70)  define  limits  for  R, 


j 


(3.73) 


3.4.  Specification  for  the  Moat  general  Model 


Having  detailed  the  effects  of  tha  characteristics  and 
llaltatlooa  of  tha  Input  data,  It  ia  now  possible  to  foraulata 
coaplata  apadflcationa  for  tha  rail  ability  functions  evaluated 
by  NEHF  and  tha  ranalndar  of  this  Chap tar  la  davotad  to  this 
task. 


The  dacusdona  to  this  point  have  baan  primarily  concamad 
with  the  aatheaatlcal  development  of  the  various  reliability 
functions  and  tha  notation  has  baan  generally  optimised  to 
that  and.  Throughout  tha  remainder  of  this  document,  tha 
reliability  expressions  will  resemble,  as  closely  as  posdble, 
tha  forma  actually  used  to  generate  tha  computer  code.  (One 
example  is  the  fact  that  tha  coda  performs  the  outermost  integration 
over  initial  crack  length  (aQ)  rather  than  Initial  ago  (nQ>.) 

Many  of  tha  expressions  presented  in  the  remaining  sections 
of  this  Chapter  will  be  stated  without  necessarily  presenting  the 
full  details  of  their  development.  It  is  assumed  that  the 
arguments  presented  in  the  previous  sections  are  suffldent 
for  the  reader  to  derive  the  same  results  without  detailed 
guidance. 

The  model  elaadfleatlon  system  described  in  Section  3.1 
is  used:  the  most  general  model  is  the  class  allowing  variations 
In  both  Xj  and  and  includes  the  three  groupings  based  on  the 
status  of  the  initial  crack  length  random  variable,  X2. 


no 


The  specification  for  this  modal  contains  two  parts;  a 
opacification  for  the  Integration  over  crack  length  for 
each  reliability  function  and  a  specification  for  the  integrands. 
The  first  part  is  general  and  applies  to  all  the  classes  of 
models  evaluated  by  NERT.  The  second  part  pertains  only  to  the 
most  general  class. 


/// 


3.4./.  Specifications  for  the  reliability  functions  as  integrations 
over  Initial  crack  length 


Each  reliability  function  can  be  written  in  the  fora 
of  equation  (3.1)  ns  an  Integration  over  initial  life  or, 
alternatively,  as  an  integration  over  initial  crack  length. 

The  foraer  choice  was  preferred  while  describing  the  theoretical 
development.  The  computer  program  actually  retains  initial  crack 
length  (Z^  or  a^)  as  the  variable  of  integration  so  that  (3.1) 
la  replaced  by, 

.a(n2) 

f(t)=  I  p  (a^fU.a  1(a0))daQ  .  (3.79J 

JnU,)  ^ 


Note  that  the  Integrand  is  still  expressed  as  a  function  of  nQ. 

The  numerical  evaluation  of  the  reliability  functions  is, 
in  fact,  based  on  a  hybrid  notation  whereby  Sq  is  used  for  the 
outermost  integration,  and  n^  is  used  for  all  other  representations 
of  the  second  random  variable  in  the  model.  (The  reasons  for 
using  the  hybrid  notation  are  that  it  is  numerically  more 
efficient,  bearing  in  mind  that  the  function  a(p)  is  defined 
as  a  series  of  ordered  pairs,  to  evaluate  p  (aQ)  directly 


rather 


than  pB^(n0) s  pa^(a(n0)) ds/dn^  and  that  the  evaluation 


of  the  limits  of  integration  and  other  logical  processes 
associated  with  the  inner  levels  of  integration  are  more 
efficiently  expresse d  in  terms  of  Sq  rather  than  Sg.  ) 


The  following  specification  for  the  initial  crack  length 
integrations  for  the  reliability  functions  evaluated  by  1CESF 
follow,  broadly,  equations  (3.2)  to  (3*17).  The  major  differences 


are  that  the  equation*  preseated  here  are  recast  ia  the  fora 
of  (3.  *??)  and  that  soae  functions  represent  combinations  of 
functions  that  were  previously  treated  as  being  separate.  Not* 
also  that  the  probability  of  survival  is  not  evaluated  as 
an  integral  expression  but  is*  instead,  derived  froa  the 
probability  of  failure  via  equation  (2.5)* 

The  reliability  functions  evaluated  by  NXRF  are: 

•  (i)  Probability  of  failure 

iaCng) 

Vt»n0)W*0)d^>'*‘58uU(n2))  5 

*<n1)“  ^  ^ 

(fro**  (3r)).  ....  (3.80) 


(11)  Probability  of  survival 

PS(t)  U  1  -  P,(t)  (3.81) 

(ill)  Pfo^bi^ty  of  detection 
a(n2) 

pa.t(t)*  pa.t(‘-°o)V*°)4*0  ‘  <5,82) 

(from*  (V  6  )) . 

(lv)  Virgin  risk  rate 


rT(t)  *  S"(n0,0)pfT(t)/Ps(t); 


(3.83) 


H3 


(v)  Rlalc  of  static  failure  by  fatjgae 


a(n2) 


*“«<*>* 


pfs(t»n0)pa0(*0)d*0/PS(t)  »* 


(3.84) 


(vl)  Risk  of  fatlzna  fractare 

[pff1(t»a0)'epff2(t,ao|]p^ao:>d*0/PS(t)  ; 

a(af1). 


rf(t)= 


(3.85) 


( v±±)  Total  risk 


r(t)  a  rT(t)  irf(t) +*rs(t)  ;  (3.86) 


(vili)  Penalty  for  strength 
|'*(aK2)  K 

p^R  (  F  >  t)*  fB( t, aQ)p  (  V da0/PS( J  (3# 87) 

(ffotw  (3 •/<»•)) 

(lz)  Failure  (lenity  for  strength 

pH(R}t)-  ^(R,t»B0)r2(B) +T(R»Raia)pfj1(t#n0) 

J*<*Rl) 

4.  fB^£2(B»t>BQ)jp^^(  aQ)daQ/(P^(t)r(  t)). 

....  (3.88) 

ffr««A (V'7),  (*•!)). 


m 


The  function*  PpCt,!^),  Pd0t<  *»“(>)»  pfy(t),  Pfa(t,nQ) 

Pfft(t#n0),  Pff2<t.V»  fR  (fi,t,nQ)  and  fR,f2(Btt,nQ)  were  defined  in 

Section  3.1.  These  functions,  together  with  the  Halts  n^,  n2  >  r'-fL  5ndi 
n.^  and  n^may  change  between  classes  of  aodel  and  are  therefore 
specified  separately  for  each  class. 

Note  that,  although  the  caution  was  given  In  Section  3. 1 
that.  In  general,  the  Units  n1  sad  nR  nay  wary  between  reliability 
functions,  all  the  models  described  herein  are  such  that  all 
the  variation  can  be  accommodated  by  the  addition  of  the  five 
extra  Holts  nd,,  nf  j,  nf2,  “hi  and  n^g.  In  equations  (3.S0) 
to  (3*88)  a1;  and  remain  the  same  for  a  given  class. 

(Note  that  expressions  for  the  extra  limits  will  be  given 
later  in  this  Chapter.) 


1 


nr 


3.4.2.  Specification  for  the  integrand  functions  for  the 
■oat  general  nodal 


The  integrand  functions  for  the  'full  nodal '  which 
accounts  for  variations  in  both  and  may  now  be  specified, 
Each  expression  can  be  derived  by  examination  of  the  appropriate 
equations  in  Chapter  2  and  including  the  correct  Unit  functions 
from  Table  3-3.  For  this  class,  the  following  functions 
have  a  special  fora; 

P?(p)  *  Px  <V(0  -  n^tAp  -  Bq)2,  (3.89) 

HOSp.nQ.t)  »  exp^-tA^-nQ^SCnQ^Jr^ot)^  +j  )*?']  \ 

...  (3.90) 

MV  *  “o  +  ^d  "  Vt/ttj  <3.9D 

?i(a0»?)  *  “o*  ^  “  no)tJL/t  .  (3.92) 


The  integrand  functions  are; 


rVW  rVP’W 


Pf(?) 


Ci  - 


MV 


HCrf,p,n0,t))P<cU.)<htd(3 


Si§  * 

fVBain 

+*  ^(p)P^#Cn0,?)dp  +  2S(if(W) 

>,<V 

+*  ^no»°)[)^  P^(«0(1  -  oxp^-r  1  («-)  t])d*.  i-  P^(*y)]  P^(^1) 


(3.93) 


Pd#t(t»°0)a 


Pfv(t)  * 


Pf«(t*no)  = 


r*d 


PS(|J) 

MV 


/W*V 

?*(■>.)«(«.  f  ,  t)  fed# 


rVW 

V?) 


foe 


-  f 

f  ^(“0*0)  5>(t#tl1)P^(t1)J^p(it(«^«jq^:.ri(<)t^<i«  (3*94) 


.*%(•>  &•****) 

^(•0  * ,  («0 *xp{-r , (*> t]  «WP? ( )  ,  (3.95) 

■ 


(9w  rVf»W 

P^C^)  ^  T 2^  »P  )  '^ifjn^jtJp^pOdiidl!  ^ 

MV  -'•c(Oq»|S) 


(3.96) 


2'  fv  Bla  '  m.*' 

p^UjK-.fl^.tjp^jl’Xii*  -  i^)  d«.;  (3.97  ) 


B«Z 


P^CoOHt*-, t^pUg, t)d«c  ^ 
‘(VV  ....  (3,98) 


*v . 
tf(B) 


Ifr  )H(B/f  (ft)  , £  ,a0,  t)  df 

r(<«> 


+•  ’  »p>P^(»)*^^-  M8)tW(* L)  y  (3.99) 
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fH,f2(R,t,n0)  ~  HS(R  I  S*<  V<*f  "  a0> 

t  r(Tf) 

X  H(B/yKtf),t’f,a0,t)  (3.100) 
where  la  (3.17  )  is  equivalent  to 

The  terns  appearing  in  the  Integration  Units  for  a^ 
in  equations  (3.80)  to  (3.88)  are; 


nl‘QdTan0,nin  ’  (as  defined  by 

(3.101) 

n2n.ninfn0>aax,  (t.td  -  >} 

(3. 102) 

(where  nn  Is  defined  by  (3.49)) 

U|  mmJL 

nf1  -  n0,nin 

(3.103) 

nf2  '  »  ma*[  F". 

(3. 104) 

“HI  =  n0,nin 

(3. 105) 

np2  a  mm  j  J 

3. 106) 

where  f  (H)  and  f  are  defined  by  (3.72)  and  (3.78)  respectively. 
n«  o. 


3.5.  Privations  and  Spodfl  cations  for  Simpler  Modal  a 


.  Tha  three  remaining  classes  of  models  have  variations 
in  at  least  one  of  the  random  variables  X1  and  Xj  ignored  and 
■ay  therefore  be  regarded  as  simplifications  of  the  full  model 
specified  in  the  previous  Section.  However,  the  derivation  of 
the  appropriate  Integrand  functions  and  limits  is  not 
necessarily  a  straightforward  redaction  of  equations  (3*89) 
to  (3.106).  For  each  class  there  are  some  functions  for 
which  a  more  satisfactory  approach  Is  to  derive  the  function 
using  the  general  methodology  described  in  Chapter  2  and  the 
assumptions  appropriate  for  the  reduced  model. 

For  this  reason,  the  spe elf  1 cations  for  the  remaining 
three  classes  of  models  are  presented  separately  and  that  for 
a  given  class  is  preceded  by  a  brief  description  of  the 
derivations  of  those  functions  which  are  not  obvious  reductions 
of  equations  (3.89)  to  (3.106). 


3.5.  1.  Constant  relative  strength 


If  Jj  la  bald  constant,  the  virgin  strength  o(,  will, 
via  aquation  (2.2 9)^  alao  ba  eonatant.  The  convention  taken 
hare  la  to  aat  1  ao  that  IFq  la  the  eonatant  value  of 
virgin  strength.  The  reliability  funetlone  for  thia  class 
can  generally  be  derived  froa  the  no re  complex  forms  by 
setting, 


*aax  a  *  aln 


(3.  io?) 


and  Ignoring  the  Integration  over*. .  For  example,  the 
expression  for  the  probability  of  survival  for  the  full 

initial  crack  aodel  of  this  class  la,  (-f ro~<  (XS^)) 

n**  r 


Ps(t) 


r  f 

*  Pnn(aO) 

\  *  W 


p^CpJHtHQ.p.no.tJdfdno 


(3.  108) 


An  important  consequence  of  the  default  limiting 
relationships  (3*44)  and  (3.44)  la  that 

‘t  * 

Failures  resulting  froa  fatigue  Ufa  Halting  are  the  sane 
as  those  resulting  froa  the  strength  being  reduced  to  Saln* 

Which  of  the  teo  identical  teras,  (pff1(t^0)  or  Pff2(t,n0))f  is  taken 
for  rf(t)  is  arbitrary  and  it  is  convenient  for  the  purpose  of  representing  the 

failure  density  for  strength  to  associate  r^(t)  with 
failures  at  RaR^. 

For  this  class  of  aodels,  proof  load  inspections  are 
identical  In  effect  to  crack  length  inspections  with 


The  derivation  of  the  density  for  strength  requires 
careful  re  const  deration  and  can  b«  made  by  transforming  the 
£  integration  in  (3. lot )  to  one  over  H,  viz. 


Ps(t) 


■1 


n2 

P^(»0>J  1(g/B0)»n0>t)dRdn0 

1  ^Ot^f^ain^  IJ(f  (r^’CH/fL))! 


I 


50  t  V* 


l1  H0lf  (f°(S/^,))( 


(3.111) 


(where  the  prise  denotes  differentiation  by  the  argiaent  off.) 
Equation  (3.111)  leads  to  the  first  tern  in  fgCH.t,^)  listed 
below  (3.122).  Tb«  second  tent  can  be  derived  by  reduction 
fros  (3.99  ). 


The  conditions  for  the  existence  of  the  integrand 
in  (3. Ill )  are, 

?,N<  r'^o1  <  <3-,E> 

where  ^(B^,*)  i**  *ro«  (3.50),  given  by, 

*f(Bain)  *  *  (3.H3) 


Equation  (3.112)  can  be  used  to  yield, 

f a^(8)  *  ■ln{f",(B/l'0),  (rdt  -^1(H/R^))tiJ)/(t  -  ttj)] 


.  (3. 11%) 

and 

^<ain{^,tp})<a<^^<sa*fAiin,Fi}) 

.  (3.115) 


3 


I 

t  : 

[ 

\  1 

i 

I 


Not*  that  a  conaaquanea  of  aquation  (3.  iQff)  la  that 
f ^  a.  1^(5^^).  Proaidad  (3.11 4)  is  usad  for  f^CR),  aquations 

(3.101)  to  (3. 10g)  ara  valid  for  tha  »4,.  Integration  Halts  for 


this  class. 


The  Sq  into grand  functions  ara; 

4<V 


PF(t,no)  =  j  Pf(*)[l  -  tt(fi0.?*aO't)]  d^a^tJC^)) 


+  SXhq.O)  [l  -  a*p{-r}(R0)t^J  P^(t±),  (3.11© 


*f(W 


pdat^t,aO)* 


(3.117) 


pfvU)  a  P1(Ho)axp^r,(R0)tJP|(ti)  ? 


pfs(t»aO)* 


p^)r2(R0.f)a(R0^,no,t) 

Pl(V 


(3.11*) 


(3.1 ’9) 


Pffi^t,no^~  P^*f ^*f"^o^*^o*^f,ao* ©^(^ft^fCa^in^  >  (3.120) 


Pff2(t’V  *  0 


) 


(3.121) 


m 


§o  irV,(*V>i 

+•  «a0,0)^tH0)«xp|-r1i(R0)^P^(ti) 
fH,f2tt,n0)  s  °* 


(3.122) 


(3.123) 


% 

l 

I 

1 

] 

.1 


ll 

I 

I 


3.5.2.  Constant  relative  fatigue  life 


If  X.  la  hold  constant,  there  is  no  variation  In  relative  fatigue 

I 

life.  If  Xj  »•  1,  the  age  of  any  structure  is  affected  only  by  the 
random  variable  aQ  and  time,  l.e. , 


*nd  ^min  s  t'haO#«ln  *  Pmax  ~  ^"o.max 


(3. 124) 

(3. 125) 


Since  the  derivation  of  the  reliability  functions  for  the 
two  classes  already  described  sere  based  on  a  transformation 
from  XT  to  £  ,  the  reliability  functions  for  this  class  cannot 
be  generated  by  a  simple  reduction  from  more  general  equations. 

The  limit  equations  can  be  generated,  however,  provided  suitable  expressions 

for  (^(Hq)  and  ^(^,£5)  are  found.  From  (2.51)  elth  Xja.1* 


?„<V  •  \  -  ‘V*  (}-'z6> 

and  by  following  the  proof  load  arguments,  (trim.  (I'fZ)) 

WVP  s  J-ttttj  (3.127,) 

-  Uq  4.  tla  .  (3.128) 

The  Integration  domain  for  the  D.,  subspace  can  be  delineated 
In  (n0,«.)  or  ((*,«-)  space  as  shown  in  Figure  3.15*  which  replaces 
Figure  3.13  for  this  class. 


The  probability  of  survival  for  the  full  initial  crack 
model  for  this  class  is,  (fro**.  U-sn)) 


*g(t)« 


P-  (n0) 


max 

4.n0,n0,t)dedn0 


(3.129) 


Figure  3.15.  Typical  juxtaposition  of  limits  for  the 
case  of  constant  relative  fatigue  life. 
Compare  with  Figure  3.  13. 


Koto  that  the  integrand  for  nQ  in  (3*129)  exists  only  when, 


»0+*  <  vw 

so  that  n2  becomes, 

n_  -  min5n_  ,  t .  (R  .  )  *  t  T 
2  V  0,aax*  f  min  J 

which  replaces  (3.102). 


(3* 130) 


(3*131) 


Following  the  differentiation  with  respect  to  time 

described  in  Section  2.2.7,  and  noting  that  ijS_  .1,  the 

Jt 

probability  of  failure  for  the  fall  initial  crack  model  for 


this  class  is. 


,“2 


pF(t>  = 


V"0’ 


r2(«c ,  i^+t )  H(* ,  n^  t ,  xIq  ,  t)  p^(.c)  dkdBjj 


1 


Bmix/^  ^f^Rnd.n^  ^ 


p  (  $*  -  t)p  (at)H^,  ,  £*-t  ,t)  dec 

u 


Bain^^p.R^ 


5(?f(Rmia>»Vpnn(Vt> 


dot 


(3. 132) 


The  second  term  of  (3.132)  which  represents  failures  at  RaRBia 
can  be  transformed  to  an  Integration  over  n^.  Denoting 
this  term  by  rf1(t), 


W;* 


x  Wi3£t>  % 


(3. t33) 


which  leads  to  the  expression  for  p^f1(t,a0)  listed  below. 


The  expression  for  pg(fi{ F?t)  can  be  generated  by  transforaing 
the  Inner  Integration  In  (3. 129)  to  one  over  R  and  then  reversing 
the  order  of  Integration.  Using  B  =  «t<f(  i^ft) , 

“2  /a«xf(Vt) 


PjJU>5  )  pnQ(a0)  #  dRdn_ 

nr  R  (V“o+t)  fU0*t) 


Sax^(  Vt}  r^f(H> '  * 

,  Pn_  (  np)  P^C  R /fi  OQ-Ht) )  H(<*-,  aQf t ,  nQ 


(3.134) 


which  can  be  ased  to  generate  the  expression  for  fg(t,aQ) 
listed  below  (the  second  tern  can  be  deduced  by  reduction  froa 
equation  (3.99)), 


The  Sq  Integrand  functions  are; 

*|(n0tt,HBax) 

Pp(t,n0)s  P^/*)^!  -  H(»c#t+nQ,n0,t)J  d«c 

-  ^Wt} 


+•  P<(«c(n0,n-.t)) 


*i<  V*  <tf 


A(9,lw) 

«V<>8  <1  “  •*p[-r1C<)^)poC(ot)d<;ii04-t<t1 

+•  flcW)] 

J  / 9 


(3.135) 


^■o^V 


Pdet(t*nO)aJ  P>)H(y,t«0,n0,t)d<  ti^Vt<^f 

^vvt} 


or  ^(n0»0)5"(tfti1)  J  p^cOexp^rjC*)*^*  Un^"^ 

y°Sd.n 

....  (3. *36) 


(  exp£-  r1fe)t]rT 


pfT(t)  *•  J  sxpt-  r1^<)tJrTU)pfltU)d-.  Ug+t  <  ^ 

....  (3.f37) 

Pf*(tf“0)-  r2(pi,n0+t)H(«e,n0^ttn0,t)p<iC<)<k.  <tf 


•  ••  • 


(3. 13») 


iig 


pff»(t»V  =  P^R»ia/f(nO+t>)H(a»ia/V(,lO*’t)»nO'*-t»“o»t)B«inr,(“o1-t) 


r<vt>4 


*i< Vt4tf  > 

(3. 13‘»> 


^ffR^**1^  *  ^ ^ ^  tf~t  jUft)! 


«t( 


(3.1 vo) 


fgU.xiQ)  =  pot(R/^(a0+t))H('8/^(a0+t)tn0+t,n01t)/s^i»0+t),t1i  uQ+t  ctf  > 

....  (3.TJ»l) 

or  S' (no,0)Hs(fi-Rp)pgt(R)exp[.-rr(H)t}  4  tj  J 

...  (3.140 

*  HS(R  "  »^VVKV^W)RVt#V 

P<(H/f(tf)  )H(R/f( tf)  »Wt,t)/f(*f) 

(3.143) 

The  terma  appearing  In  the  integration  Unite  for  a^  are; 
a1x  aO,ain 

“2* 

“ft' 


(3.144* 
(3. 14>0 
(3.140 
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iHf 
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“2  * 

(3.14*») 

nd1  = 

(3. 14$) 

"si  ■- 

,ax  tno,«m^p,H  ’  ^  • 

(3.14?) 

“a  *■ 
*2 

“2 

(3.n'0) 

3*5.3.  Constant  relative  strength  and  relative  fatigue  Ufa 


The  final  class  represents  the  combination  of  the  simplifications 
of  the  two  previous  classes.  X,  and  Xj  are  held  constant  so  that. 


*  *  , 
*minmOmaxi80  » 


(3.  m) 
C3- 

(3. 153) 


and  Plain  *  “o.min^  ^max  *  nO,max'f't  • 

The  expression  for  the  probability  of  survival  for  the 
full  Initial  crack  model  for  this  class  la,  ( f '<>**■  (iff)) 


s«w  -  ‘ 

v*,s  “o)H(fio»  ^0*  ao»  °  ^ 

Jn0,min 


(3. 15J3 


and, as  was  the  ease  for  the  constant  relative  strength  class, 

proof  load  and  crack  length  inspections  are  identical.  Differentiating 

(3.153)  with  respect  to  tlms  leads  to, 

#  w  -  * 

p  (t)»  r2(fif0,ttn0)p^(n0)H(H0,t-m0,n0,t)dn0 

^0, min 


+  5"(tj,tj(BB^n))5'( tj-tja^)  pa^( t^-t)H(BQ,?j,t^-t,d;)  • 


(3.150 


There  Is  only  one  rf  ten. 
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The  da rl ration  of  pR(R  \  T>t)  is  aade  by  transforming 
tha  integration  in  (3*153)  to  ona  over  H  in  a  siailar 
manner  to  that  used  to  derive  (3.111).  Tha  re ault  of  tha 
transformation  ia. 


B0r<nc 


.) 


0,aln 

p  (^(B/S^-t)  H(H0./1(H/R0),/1(R/H0)-t,t)  dR. 

V(tf\n,)  ®o 1 Y*  (V/_  1  (fi/fQ) )( 


(3. 151) 


which  yields  tha  expression  for  fH(t  ,nQ)  listed  below.  Note 
that*  given  R,  t.(t,nQ)  exists  only  for  a  given  valna  of  nO» 
i.a. , 

a0=  fhs/B0)  -  t  .  (3.15*) 


The  fc0  integrand  functions  are; 


P^t,*^)  =  V  -  H(S0,n0+t,n0,t)  ^^nQ+tctj 

or  1  -  exp^-r^R^t}  ,  *0*t<\ 

....  (3.157) 

Pdet(t»aO>  *  H(?0.a0^.Vt)  *d^Vt<?f  (3*1fc0) 

p,v(t)  a  S^ngiOr^R^exp^-  r^R^tj  (3. HO 

*fs(t»V  m  r2(V*V  WB0»ttB0»a0»t>  *«o< 


(3. 161) 


<3. 164) 


fjjU'V  Hg/fy-t)  B(R0,f 1C8^)), 

f *  ( f  T( s/a0) )/ 

t+aD<  *1  (3. 16.D 
(3.166) 

The  tarns  appearing  In  the  Integration  Halts  for  «q  are; 


“t  *  “OfBia 

(3.167) 

■a  =■ 

(3. 16$) 

“ft  ~  ~  * 

(3.16?) 

nf2  »  *f  “  * 

(3.  no) 

“dt  *  *4  '  t 

(3.17  0 

(3. 17D 

>*a2  -*■  /TCH/R0)-t  . 

(3.  <13 ) 

Note  that  coincident  Halts  in  (3-172)  and  (3.173)  ioply  a  point  evaluation  of 
the  Integrand  rather  than  a  zero  Integration. 


3.6.  The  Construction  of  a  Time  Sequence 


Hie  specif i cations  detailed  in  the  previous  flections 
are  eoaplete  In  that  they  define  the  reliability  functions 
so  that  they  aay,  in  principle ,  be  evaluated  at  any  value  of 
tine.  Moreover*  each  function  is  defined  in  such  a  way  that 
knowledge  of  the  prior  history  of  the  function  is  not  required. 
Sven  the  Inspection  procedures  •  -  can  be  correctly  incorporated 
if  the  tlae  of  only  the  latest  inspection  is  defined. 

However*  the  evaluation  of  the  reliability  functions 
at  a  single  instant  of  tine  usually  provides  little  information 
regarding  the  behaviour  of  the  aodel.  A  eoaplete  tine  history 
is  essential,  particularly  if  several  inspections  are  invovled. 

The  development  of  a  tlae  sequence  of  reliability  functions 
is  thus  a  significant  feature  of  the  HBHF  computer  pro gran. 

A  tlae  sequence  is  normally  comprised  of  three  sub-sequences 
defined  by  the  user  as  described  below. 

(1)  Evaluation  tlae a 

A  sequence  of  Iff  evaluation  tlaes  ,  t  ,  fora  the 

U 

basis  of  the  tlae  sequence.  These  values  a ay  be 
specified  in  any  way,  but  are  evaluated  in  ascending 


order 


J  Inspection  tines  tij  can  be  Included  In  the  sequence. 
There  are  several  ways  In  which  these  tines  can  be 
either  specified  as  input  data(  or  calculated  bj  NERF. 
Section  3.6 .2*  below  details  the  options  available. 

(ill)  Strength  distribution  tines 

A  sequence  of  tines  at  which  the  density  of  strength 
and  the  failure  density  of  strength  are  eonputeii  (for 
a  aeries  of  values  of  R)  can  also  be  selected.  For 
a  given  tine  sequence  of  reliability  functions  these 
tines  (M  values  of  t^)  can  be  either  specified  as 
input  data  or  be  tlned  to  coincide  with  each  Inspection. 
In  the  latter  case  the  distributions  are  calculated  either 

just  before  or  Just  after  each  Inspection. 


These  three  subsequences  (any  of  which  nay  be  enpty)  are 
combined  to  fora  a  total  sequence  of  K  values  of  tine,  t^  at 
which  the  reliability  functions  are  evaluated. 


3,6.1.  Auxiliary  functions 


In  addition  to  the  basic  rail ability  functions  defined 
In  Section  2.  1 *  the  following  auxiliary  functions  are  evaluated 
either  as  part  of  the  tine  history  of  functions  or  together 
with  the  strength  and  failure  densities  at  t^. 

Cl)  Mean  risk 

For  a  given  value  of  tlse  the  seen  risk,  rMan(t)  Is 
defined  as  the  velue  of  risk  rate  that  would  have  produced 
the  probability  of  survival  at  that  tLae  had  that  ride  rate 
been  applied  as  a  constant  ride  over  the  interval  [p.t] . 

By  equation  (2. 10) 

Pfl(t)  a  exp^-rim(t).tS  (3.174-) 

so  that, 

r.ean(t>  -  log^U^t  .  C3.17D 

(11)  Expected  tiae  of  fail are 

Using  F  to  denote  the  raudou  variable*  tiae  of  failure* 
the  expected  tiae  of  failure  XF)  is  given  by* 

XF)  *  [  tpf(t)dt/Pf(t)  .  (3.17b) 

Jo 

Pros  the  sequence  of  values  of  p^t^)  and  Pj(  t^) ,  XF) 
is  eoaputed  by  assuulag  that  pf(t)  varies  exponentially  over  each 
tiae  interval  ([tj^.t^i.e. , 


*  pF(tic-i)axp(i°g(p(y  ?  ct  -  |  . 


.  (3. 177) 

Integrating  (3.177)  over  the  Interval  jt^j  .t^laada  to 


*l>k  -  (ffVtyv 

where  (tpf)fe  *  tpp(t)dt 

and 

(tpf}k  “  (tpfJk-1  *  (tk  ~  V-T.* 

l05[pp(tk)/pp(tk_i^ 

*  Fy^V  ”  Vl^Vl^  "  ~  p£(tk-1  j 

WMV'VVi*] 

.  (3. IPO) 

The  recurrence  equation  (3. 1 PQ)  can  be  used  to  construct  the 
required  sequence  of  estlaates  for  *(£).  Note  that  each  value 
(In  particular  the  first)  of  Pp(tfc)  aust  be  non  zero  ..if 
equation  (3.  Vio)  la  to  yield  satisfactory  results.  Replacing 
a  zero  value  by  a  snail  positive  number  (say  10**^2)  sill  overcome 
this  problea. 


(3.174) 

(3.177) 


/37 


(ill)  Distribution  of  strength 

Given  the  density  for  strength  pR(R  |  F>t),  the  distribution 
of  strength  Is  given  by, 

R 


?H(R)F>t)-|  pR(R|F>t)dR  . 


(3.  120 


(iv)  Distribution  of  the  failing  load 

Given  the  failure  density  for  strength,  pg(R  |  t),  the 
distribution  of  the  falling  load  is  given  by 

fR 

PH(fil  t)  a  1  pH(R  l  t)dS.  (3. I8aj 

J  0 

(▼)  Expected  value  of  strength 

Given  the  density  for  strength  Pg(R  [  F  >  t) ,  the  expected 
value  of  strength  S(R  I  F  >  t)  is, 


E(R|F>t>*  Rps(R|F>t)dR 

Jq - - 

7t) 

(vl)  Expected  value  of  the  ialllaa  load 


(3.183) 


Given  the  failure  density  for  strength,  pR(R  (  t),  the 
expected  value  of  the  failing  load  Is, 


£(R  |  t)  *  J  Rp^CR  j  t)  dR. 


(3.184) 


O 
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3,6*2.  Inspect ion  procedures 

The  inspection  times  can  be  either  specified  as  input 
data  or  calculated  by  NERF. 

(i)  Periodic  Inspections 

If  the  inspection  times  are  specified,  the  inspection 
procedure  is  termed  'periodic'.  Complete  freedom  is 
allowed  regarding  the  selection  of  inspection  times 
which  do  not  have  to  coincide  with  the  evaluation  times. 
In  fact,  it  is  possible  to  perform  a  sequence 
of  calculations  for  which  only  the  inspection  times 
are  specified.  Such  a  calculation  is  referred  to 
loosely  as  a  continuous  inspection  procedure  wherein 
an  Inspection  occur  every  time  the  reliability  functions 
are  evaluated. 

(i±)  Limit  risk  inspections 

the  calculation  of  Inspection  times  by  NERF  uses  as 
algorithm  which  monitors  the  total  risk  rate  and 
arranges  that  inspections  occur  when  the  risk  rate 
rises  to  a  prescribed  level.  After  each  inspection 
the  risk  rate  decreases,  usually  to  a  value  lower 
than  the  prescribed  value.  In  the  event  that  this  does 
not  occur,  the  inspection  procedure  is  terminated. 


It  is  possible  to  prescribe  a  different  limit 
risk  for  the  first  inspection  from  that  uses  for  the 
calculation  of  the  remaining  inspection  times, 

(ill)  Periodic  and  limit  risk  inspections 

1  combination  of  the  two  inspection  procedures  is 
is  possible.  The  first  inspection  occurs  at  a  specified 
time  and  the  remaining  inspections  are  computed 
by  the  limit  ride  algorithm, 

(iv)  Replacement  at  inspections 

It  each  inspection  a  fraction  of  the  population 
(magnitude  Pdat(tij))  is  removed.  This  fraction 
can  optionally  be  replaced  by  'perfect*  structures 
which  will  not  experience  any  risk;  of  failure.  If 
this  option  is  exercised,  the  probability  of  survival 
at  any  given  time  includes  the  sum  of  the  probabilities 
of  detection  at  all  previous  inspections,  i.e., 

J 

Pg(t)  *  P^tHlPdet**1,)  (3.181} 

J-1 

where  tij'  is  the  time  of  the  last  inspection 

before  time  t  and  P^(t)  the  probability  of  survival  without 
replacement. 

Examples  of  the  results  of  exercising  the  various 


inspection  procedure  options  are  shown  in  Figures  3. H  to 
3.12.  All  calculations  are  for  example!.  Figures  3.1 fc  sad 


VfC 


3. 17  show  probabilities  of  survival  and  total  risk  rates 
respectively  for  two  calculation  sequence a  which  both 
Included  periodic  inspections  but  one  exercised  the  replaceaent 
option  whereas  the  other  did  not.  Hots  that  the  calculation 
was  continued  to  the  point  where,  without  replaceaent  the 
whole  population  had  either  failed  or  been  removed  by  Inspection. 
The  population  receiving  replaceaent  structures  finally 
assynptotes  to  a  constant  probability  of  survival  Indicating 
that  the  bulk  of  the  population  has  been  replaced  by  'perfect' 
structures.  (It  should  be  emphasised  here  that  in  the  course  • 
of  normal  operation  of  NERF  such  extreme  calculations  would 
rarely  be  nade.) 

Figure  3.18  shows  two  total  risk  rates  obtained  by  the 
Unit  risk  algorithm  using  crack  length  Inspection  tests 
having  different  values  of  a^. 
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Figure  3. 16 


Heplaeeaent 
So  replaoeaent 


Probability  of  survival  for  example  A 
subject  to  periodic  inspections  every 
1000  hrs. 


Total  risk  rate  for  example  A  for  the 
case  of  limit  risk  inspection.  Inspections 
are  perfect  and  are  based  on  two  different 
crack  length  criteria. 


l¥t 


3.6.3.  Simplifying  option e 


Although  the  numerical  Integration  algorithms  used  by 
NEHF  are  efficient,  the  calculation  of  the  reliability  functions 
can  Involve  considerable  computation,  especially  if  the  full 
generality  offered  by  the  computer  program  Is  employed. 

There  is  therefore  sufficient  motivation  to  seek  computation 
reduction  via  simplifying  aproximations  where  appropriate. 

Two  such  approximations  are  described  in  this  Section. 

(1)  Computation  of  P^Ct)  from  r(t) 


If  the  reliability  functions  are  evaluated  with 
sufficient  frequency  It  may  be  possible  to  evaluate  the 
probability  of  survival  by  Integration  of  equation  (2.6),  i.e., 

Pa(t)  *  1  -  f  p_(t)dt  .  (3.186) 

8  J  0  £ 

At  each  evaluation  time  an  integral  expression  for  pp(t) 
(sr(t).Pj(t))  is  available.  Equation  (3.186)  can  be 
approximated  by  assuming  the  p^(t)  varies  exponentially 
over  each  time  Interval,  l.e.,  (ni  (JwT>)) 

P£(t)  a  P ^ V 1 } i 10 f ( tk )/p £( tk- 1  *  Vl^ 

.  (3.187) 

which  leads  to  the  recurrence  relation. 


PS<  V  *  vw  -  (Vtk-1)(pP(tk)-pg(tk.1)) . 

los^v/p^tk.,)} 
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<3. 188) 


Equation  (3. 18?)  can  ba  used  to  construct  an  approximate 
sequence  of  values  for  Pg(t).  Provided  the  time  intervals 
are  small,  these  approximate  values  may  be  sufficient  particularly 
in  those  cases  where  interest  is  confined  to  small  values  of 
time  when  Pg(t)ft:t. 

One  increase  in  computational  effort  resulting  from  the 
use  of  (3.188)  Is  that  associated  with  the  evaluation  of  the 
probability  of  detection  at  each  inspection.  Whereas  the 
use  of  integral  expressions  for  Pg(t),  (or  P_(t))  permits 
the  evaluation  of  by  taking  the  difference  between 

the  probaULl  ties  of  survival  before  and  after  an  Inspection, 
the  approximate  sequence  cannot  yield  this  information  and 
an  integral  expression  for  Pdat(tij )  must  be  used.  Equation 
(3* 186)  loses  its  computational  advantage  if  inspection  times 
dominate  the  total  sequence  of  evaluation  times. 

(ii)  Neglecting  the  effect  of  losses  from  the  population 


The  calculation  of  the  loss  factor,  involves 

an  integration,  which  may  be  avoided  if  the  factor  is  omitted. 
Various  approximate  expressions  which  neglect  the  effect  of  losses 
from  the  population  were  presented  by  Diamond  and  Paynd*  and 
NEW  permits  H(*,p,nQ,t)  to  be  neglected  for  all  the  reliability 
functions.  Acceptable  results  can  be  obtained  when  Pg(t)»1. 
However,  the  use  of  an  interpolation  table  for  the  loss  factor, 
largely  obviates  the  need  to  invoke  this  facility  which  is 
retained  primarily  to  ensure  compatibility  with  earlier  calculations. 


4.  NUMERICAL  METHODS 


The  organisation,  operation  and  performance  of  iflSRF 
depends  heavily  on  the  numerical  methods  used  to  evaluate 
the  reliability  functions.  In  particular,  the  selection  of 
the  method  for  numerical  integration  has  a  fundamental  effect 
on  the  structure  of  the  code,  the  efficiency  of  the  calculations 
and,  in  terms  of  the  functional  forms  of  the  density  and  input 
functions,  the  versatility  of  the  computer  program. 

An  adaptive  integration  technique  which  automatically 
adjusts  the  points  of  evaluation  of  the  integrand  to  control 
numerical  err<rs  was  chosen  and  has  proven  to  be  efficient, 
reliable  and  to  a  large  extent  has  removed  any  dependence  of 
the  code  on  the  forms  of  the  density  and  input  functions. 

The  adaptive  integration  algorithms  form  the  heart 
of  KERF  which  can  be  considered  as  a  computer  program  which 
organises  the  reliability  models  and  data  so  that  they  can 
be  procesed  by  the  integration  algorithms,  (in  much  the  same 
way  that  a  finite  element  program  organises  the  element  models 
for  processing  by  algorithms  for  the  solution  of  sets  of  equations.) 

The  requirement  that  the  input  functions  be  represented 
by  ordered  pairs  of  argument  and  function  values  necessitated 
the  use  of  an  efficient  and  well  behaved  (especially  in  terms 
of  continuity)  interpolation  methods.  Cubic  spline  interpolation 
has  proved  to  be  satisfactory. 


The  calculation  of  inspection  intervals  using  a  limit 
risk  condition  (Section  3 .6.2)  demanded  the  use  of  an  equation 
solver  which  could  cope  with  the  functions  defined  by  the 
expressions  for  total  risk  rate,  r(t).  The  secant  method 
is  simple  and  effective  in  this  application  and  is  used 
elsewhere  in  the  code  to  provide  function  inverses  and  solve 
equations  govering  some  integration  limits. 

Other  numerical  methods  used  by  NERF  include  the  location 
of  sensible  limits  for  the  arguments  of  probability  density 
functions  and  processes  involving  sequences  of  numbers. 

(such  as  index  location  and  merging  of  two  sequences.) 

All  these  numerical  methods  are  general  in  nature  and  are 
not  particularly  tied  to  the  evaluation  of  reliability  functions. 
For  this  reason  they  are  described  separately  from  the  main 
documentation  of  the  NERF  program  (Chapter  5).  By  accessing  the 
NERF  program  as  a  library  of  subroutines  and  functions,  these 
numerical  methods  are  available  to  other  programs. 


4. 1.  Numerical  Integration 

As  already  stated,  the  aslaeted  method  of  numerical 
integration  dictates  aach  of  the  structural  charaetereristies 
of  the  MERf  program.  When  the  development  of  the  nuaerioal  methods 
for  the  evaluation  of  roll  ability  functions  was  comae  need  at 
ARL,  adaptive  Integration  aetheda  were  relatively  new,  particularly 
those  that  could  bo  applied  to  multiple  integrations.  A  pilot 
study  using  a  conventional,  non-adaptlve ,  composite  Simpson 
aothod  demonstrated  that  the  peaked  nature  of  many  of  the  integrands 
of  the  reliability  functions  necessitated  the  use  of  an  adaptive 
method. 

Adapatlve  methods  for  integration  ean  automatically  select 

the  points  of  evaluation  of  the  integrand  and  the  Integrating 

functions.  According  to  KloeU*'  ,  there  are  somewhere  between 
6  7 

10  and  10'  algorithms  that  are  potentially  interesting  and 
significantly  different  from  one  another,  in  recent  years  there 
have  appeared  interesting  studies  of  various  adaptive 
algorithms  and  methods  for  selecting  the  most  appropriate  algorithm 
for  a  given  application. 

With  the  exception  of  a  recent  discussion  by  TTitsch,  Kahaner 

rr 

and  Lyness,  rigorous  discussions  of  adaptive  algorithms  and  error 
estimation  have  been  confined  to  single  levels  of  integration, 
fhe  problem  ef  interfacing  adaptive  integration  algorithms 
designed  for  the  evaluation  of  singLe  Integrals  to  form  a  suitable 
algorithms  for  multiple  integration  has  been  largely  open,  certainly 


during  tha  period  of  tin*  daring  which  NKRF 


developed. 


Tho  design  of  «n  algorlthn  for  application  to  the  oval nation 
of  rail  ability  functions  consists  of  too  stops.  Tbs  first  Is  the 
construction  of  an  algorithm  for  single  Integration:  the  second  Is 
the  development  of  suitable  Interfacing  for  the  application  of 
that  algorithm  to  a  sultiple  Integration  conaltlng  of  nested 
single  Integrations.  In  particular,  the  aocoaulatlon  of  error 
estloates  and  the  control  of  Inner  Integrations  to  satisfy  the 
requirements  of  the  outer  Integrations  require  careful  consideration. 
The  description  of  the  adaptive  algorlthns  used  hr  *EBF  follows 
these  two  steps.  The  aathenatleal  basis  and  laplenetatlon  of  the 
algorithm  for  single  Integration  Is  described  first  followed 

by  the  description  of  the  interfacing  for  multiple  Integration. 


/<ro 


4.  t.1.  Mathesatlcal  bj^a  (single  Integration) 

The  algorltha  uud  for  single  Integration  1  a  based  on 
the  adaptive  Slapsoa  algorltha  originally  developed  by  McKesson^  • 
Subsequent  refinements  and  error  analyeea  were  presented  by 
Lyases' ^  •  the  dlaoaeaion  presented  here  la  a  blend  of  that  of 

if 

Lynesa  and  more  recent  diaeusalons  of  error  eatiaatea  by  Osborne 

IV 

and  extrapolation  techniques  by  Boblnaon  • 


The  objective  of  any  nuaerlcal  Integration  procedure  la  to 

estlnate, 


rk 

I(a,b)  a  f(x)dx  (4.1) 

■*  a 

within  a  specified  absolute  tolerance,  £>ba.  Moat  procedures 
satisfy  this  objective.  However,  the  Important  consideration 
In  any  practical  situation  la  coaputlng  cost  and  the  ideal 
Integration  procedure  la  one  which  satisfies  the  above  objective 
with  alnlaua  cost,  (usually  expressed  In  terns  of  the  umber  of 
Integrand  evaluations. )  Cost  alalalsation  is  particularly  Important 
If  the  procedure  is  to  be  nested  to  provide  a  multiple  Integration 


algorithm. 


Zt  Is  not  possible  to  establish  rigorously  the  optimal 

qualities  of  a  given  adaptive  algorltha.  Moreover,  It  Is  not 

possible  to  prove  that  a  given  algorltha  will  cope  with  all 

lo 

eventualities  (see  Lyness  and  Kaganova  ).  Zn  fact.  It  la 
preferable,  from  the  mat  viewpoint,  to  operate  most  adaptive 
algorithms  under  conditions  for  which  there  is  a  finite  probability 
of  failure  of  the  Integration  algorltha.  (/allure  manifests  as 


15-/ 


tri 


an  infinite  coat  to  satisfy  (4*1 )• 

Fortunately,  this  probability  of  failure  ean  be  kept  very 
small  and  the  error  estimates  provided  during  the  operation 
of  the  algorithm  usually  give  a  ready  indication  of  incipient 
failure.  Moreover,  the  rising  cost  associated  with  failure  gives 
the  adaptive  procedure  the  desirable  property  of  providing 
a  self  indication  of  possible  failure. 

Let  I  (a,b)  denote  a  numerical  estimate  of  I(a,b)  using 

A 

n  evaluations  of  the  integrand.  The  coat  objective  ean  be  expressed 
as  finding  the  simians  value  of  n  for  which, 

|  I(a,b)  -  Ia(a,b)|  <  .  (4.2) 

in  adaptive  integration  procedure  satisfies  (4.2)  by  either  adjusting 
the  points  in  a, b  where  the  integrand,  f(x),  is  evaluated  or  by 
selecting  different  rules.  Mote  that  the  evaluation  count,  a  , 
includes  all  function  evaluations  made  during  the  selection  process 
and  not  just  those  used  to  fora  the  final  answer.  The  algorithms 
described  here  adjust  only  the  points  of  Integrand  evaluation. 

Condition  (4.2)  is  an  absolute  error  criterion,  in 
alternative  relative  error  criterion  can  be  used,  l.e. , 

|l(a,b>  -  I#(a,b)\  1  \f(x)dxl.  (4.3) 

The  application  of  (4.3)  within  the  adaptive  algorithm  poses  the 
problem  of  providing  estimates  of  the  integral  term  which  is, 
of  course,  not  known  precisely  until  the  integration  process 
is  completed. 


Ia  practice,  (4*3)  is  replaced  by, 

j  I(a,b)  -  Ia(a,b>(  <  CMl  j^f(x)|dx  .  (4.4) 

A  roaming  estimate  of  the  Integral  term  is  kept  daring  the 
operation  of  the  algorithm.  Rote  that  although  (4.4)  la  used 
approximately  daring  the  algorithm,  error  estimates  can  be  made 
on  an  absolute  basis  and  oo averted  to  relative  error  estimates 
on  completion  of  the  integration. 

The  distribution  of  integrand  evaluation  points  Is  found 
by  successive  subdivision  of  the  Interval  [a,b]  .  As  each 
subdivision  Is  mads,  the  change  in  the  estimate  for  the  Integral 
Is  examined  In  the  light  of  either  (4.2)  or  (4.4)  and  a  decision 
made  regarding  further  subdivision. 

it 

McKesson's  original  scheme  vas  based  on  the  3  point 
Simpson  rule.  Denoting  the  estimate  obtained  by  applying 
this  rule  over  the  whole  Interval  by  S^(a,b-a) ,  where, 

s’(a,b-a)  =  ^f(a)  ♦  4*((a+b)/2)  *  f(b)]  (4.5) 

where  the  notation  is  defined  by, 

Sj  (x,AXp)  »  ffr  \  f(x)  +•  4f(x+« Xy/2)  ♦  f(x+sxp)]  (4.6) 

6 

where  nxp  depends  on  the  level  subdivision,  with  AXj  being 

the  same  as  (b-a).  McKesson' s  subdivision  logic  vas  based  on  dividing 

each  Interval  into  3  sub-intervals.  For  the  first  interval,  [a,bl, 


j& 


the  estimate  after  subdivision  is  given  by, 
S^(a,b-a)  a  (a.ax^ 


vbara 


AX1  ^f(a)  r  4f(a+4Xj/6)  +  2f(a*4Xj/3)  v  4f(a-f*Xj/2) 

+  2f  (a*  24x^3)  ■*■  4*(a  «•  SaXjA)  +f(atax1) 

...  (4.7) 

«  s|  (a,nx2)  +  s|(a4-ax2>ax2)  +*  s|(a*.  2ax2, ax2)  (4.8) 


4*r  «•  (b-a)^*"1  • 


(4.9) 


Const  daring  the  first  subdivision,  if  ^(a,^)  -  S^a.&x,)) 
is  greater  than  sous  ehossn  erltarlon,  than  the  subdivision  proeaaa 
continues  by  dividing  each  of  the  intervals  [a, awx^  ,  [a+ax2,a  v 
|a  +  2&x2,a  +3dx^]in  the  saae  manner  as  described  above  for  the  first 
subdivision.  The  criterion  applied  at  each  level  of  subdivision 
depends  on  dxr.  Mckeenan  used  the  criterion  £./3r~^  where 
£  is  the  absolute  error  requirenent  (4 .2).  In  his  sehene 

subdivision  continued  if, 

|s£(x,hxr)  -  sJU.ax^l  >  (4.10) 

Lynese1^  ,  suggested  several  Modifications  to  this  logics  those 
that  have  been  implemented  in  the  BSH7  algorithm  are  described  below. 


(1)  Inch  interval  is  hl-seeted  rather  than  tri-eected. 


The  estimate  after  subdivision  of  the  Interval  [x,x  tmesis 


£f(x)  +>  4f(x+4XJ/4)  +  2f(x+ AXj/2) 

+  4f(x  +34x^4)  +  f(x  +  4xy)^ 

♦  4*'  U,kXtrV «rtt> 

(4.11) 

(b-*)/^1  .  (4.12) 

(11)  Equation  (4.10)  la  replaced  by 

l^(x,axr)  -  «g(*da^)|  >  CqC/2^1  (4.13) 

where  CQ  la  a  constant,  defined  below. 

(ill)  After  the  subdivision  process  Is  couplets,  extrapolation 

Is  used  to  provide  a  sore  accurate  estimate  of  the  Integral 
and  to  estimate  the  error. 

1*7 

Die  question  of  extrapolation  was  first  considered  by  Lyness 
and  sore  coaplete  analyses  were  presented  by  Osborne**  who 
derived  a  generalised  Euler  Haelaurln  expansion  for  the  error 
associated  with  a  numerical  integration  formula.  As  simplified  by 

if 

Bobinson  ,  the  results  and  lnpU cations  for  the  present  sebeme 
are  described  below. 

Let  be  an  n  point  quadrature  sun  defined  by, 

^^f(x)ja,b)«  k  ZAjfla^)  (4.14) 

where  h  *  (b-a)  and  0  &  •  •  ■  5j  *•  *  1  and  the  Aj  are 

positive  weights  that  are  Independent  of  f  and  h.  If  the  function  f 


s|(x,4xr)  ^ 


where 


Axr  * 


is  continuous  and  has  continuous  darlritava  of  sufficiently  high 

|6 

order,  then  it  ean  he  ahoan  (Oaborne  )  that 


I(a,h)  s  Qaif(x),atbJ-^1hk[fk’1Cb)  -  ^“^a)]^  o(hk+1) 

...  (4.15) 


the  coefficient  yk4l  ia  the  first  non  zero  term  in  the  series 
defined  by 


1  n  •> 

y  -  ■-  Z  A  (f  fj L 

f±  T±=TTi  j>,  W  j‘ii-3+1 


(4.16) 


with  •  i. 


For  the  3  point  Sinpsoa  rule,  n«3,  £,=  0,  *  1  *  Aj  •  1/6, 

A2«  4/6,  Aj  *  1/6  and  the  first  nonzero  is  given  by 

*»*  ir  [|  <i>*  *  i  -  j] 

1 

'  2555  (4.17) 


so  that 

I(a,b)  -  s’u,^)  -  ^[Ab)  -  Aa)]* e(h5)  .  (4.18) 

Sinilarly, 

ium *  ^ 4 «'})  c'-,9> 

and 

Ka,b)  9  S^(a,dx1) -[^(a,^^  -  gjU.AX^j/U  +  o(h5)  .  (4.20) 
this  resolt  is  true  for  integration  over  any  interval, i.e. , 

X(x,x+axr)  a*jj(x,Axp)-[gj(x,nxp)  -  a^(x,4xr)j/15  +  o(Ax^) .  (4*^0 


If  the  interval  £x,  x+ax^  la  accepted  by  the  subdivision  logic, 

S^Cx, axr)  dll  be  the  tern  representing  the  integral  over 
that  interval,  the  final  result  will  be  the  ana  of  such  integrals, 
the  texa  S^(x,  xp)  -  s|(x,  xp)  ha a  already  been  ooapnted  for  appUeatloi 
in  equation  (4. 13)  and  ean  be  uaed  to  return  an  extrapolated  eatlaate 
via  equation  (4.21).  This  eatlaate  will  have  an  error  of  order 
Ax*?.  Lyases  argued  that  the  original  acceptance  criterion  is 
conservative  if  extrapolation  is  used  and  reooaaended  that  (4*13) 
be  applied  with  CQ  *  15.  the  second  tern  on  the  B.H.S.  of  equation 
(4,21)  la  taken  as  the  error  eatlaate  for  that  interval.  The 
error  eatlaate  for  the  whole  integral  la  then 


£«t  *  L£JaS<I-“r>  -  <*•“> 


set  - 5' 

Vote  that  if  the  sua  in  equation  (4*22)  la  aade  as  the  intervals 
are  accepted  the  extrapolation  ean  be  aade,  once  only,  to  the  final 
result  rather  than  when  each  interval  is  accepted. 


► 

t 
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■  I 
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V.1.2.  Iaplementatlon  (single  integration) 

The  adaptive  Integration  algorithm  coded  in  SERF  is 
baaed  on  the  adaptive  3  point  Simpson  algorithm  described  above. 
Several  modifications  to  the  algorithm  have,  however,  been 
Implemented. 

(1)  Specification  of  nodee  for  Initial  snb division 

Sons,  of  the  Integrand  functions  are  defined  by  sequences 
of  ordered  pairs  of  argument  and  function  values.  The  interpolation 
algorithms  do  not  necessarily  result  in  continuous  3rd  and  ifth 
derivatives,  meaning  that  the  error  analysis  and  extrapolation 
arguments  presented  in  the  previous  section  do  not  strictly 
apply,  taring  the  development  of  the  NXR7  program,  it  was  observed 
that  one  of  the  reasons  for  failure  of  the  Integration  algorithm 
was  interference  between  the  intervals  set  by  the  ordered  pairs 
defining  the  integrand  and  those  created  by  the  subdivision 
logic  used  by  the  integration  algorithm. 

To  circumvent  this  difficulty,  an  initial  set  of  intervals 
can  be  specified  before  entry  into  the  adaptive  integration 
algorithm;  i.e.,  the  interval  la  divided  by  j^,  1«  1....,  m, 

where  x^a,  a^b  •  &  *l<Jti+1“**  8418,1  lBt»rTal 

is  Integrated  separately  so  that  the  specified  nodes  appear  as 

v\ 

individual  end  points  for  the  adaptive  integration.  Over  eaeh 
interval,  the  integrand  is  assumed  to  have  continuous  derivatives 
up  to  4th  order.  The  overall  integral  is  given  by, 

Ka,b)  *  £  (4.23J 


* 

'M 


IS? 


It  each  Integration  haa  an  error  mmj  than  the  total 
•rror  €.  la  given  by, 


«.»« * 

«P‘ll  (4.21,) 

IM 

The  requirement  €  <  can  be  net  If 

6  1  ^  t  •  (4*25) 


(U)  latemMa.  over  JjjkttA  «abdlTialoa  intervale 

Saeh  Interval  !•  Integrated  Initially  aalng  the 

trapezoidal  role,  viz  , 


The  interval  la  then  aabdlvlded  to  prodaee  the  eatiaate, 
*3(*t *  *2c*i 

.  (4.27) 


Valng  eqaatlona  (V.  15)  to  4.16), 


h(xllXX^}  *  *2txl'*ler*l)  "  +-®<*3> 

....  (4.28) 

■*jui'xie.-*  >  *  «c  f^b)  -  f\»J  +  o(h3). 


•  •  • 


(4.29) 


Vmlag  these  two  estimates,  the  extrapolation  for  tho  Interval  ia 
glwan  by, 

+  o(h4)  (4.30) 

*  S3(5si,*l4.rxl)  *  •*k*)  •  (4.3D 

The  extrapolation  from  th«  two  trapezoidal  estimates  la  the 
sane  a*  a  3  point  Simp son  integration  owor  tho  lntorral.  Equation 
(4.3D  could,  of  course,  bo  applied  directly.  However,  the  aequo  nee 
adopted  abowe  yields,  via  the  tern  TjCj^.x^-j^)  -  T2(x1ix1+1“x1), 
a  aeaaore  of  the  error  aaaodated  with  the  Slnpaoa  Integration 
and  a  aeana  for  da  to  raining  whether  the  Interwal  requires  the 
fbll  adaptive  Integration.  If, 

il  T3^xi»3ci*-i“xi^  ~  T2^Il,Il«-l~xi>t 

^  £.».  (*^t  -  3t1)/(b-a)  (4.32) 

the  Initial  Integration  la  accepted  for  the  Interval 

If  the  Integration  la  accepted,  the  L.B.S.  of  equation  (4.32) 

la  taken  aa  the  eatlaate  of  the  error, 

An  Interval  for  which  (4.32)  la  not  aatiafled  ia  Integrated 
by  the  adaptive  3  point  Slnpaon  algorithm.  In  thla  caae,  the 
error,  t^ia  calculated  via  equation  (4.22). 

The  overall  anbdlvlalon  sequence  la  ahova  achenatlcally 
la  figure  4. 1.  Kate  that  the  initial  aubdivlaioa  aodea  are 
obtained  froa  a  apedfled  set  which  enooapaasea  the  interval 
[a,b].  The  cede  la  the  adaptive  integration  routlaea  laauea 
a  warning  If  thia  la  not  ao. 
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Figure  4.1.  Schematic  representation  of  the  overall  adaptive 

integration  process.  The  points  denoted  by  vertical  )j 

bars  are  locations  of  integrand  values  that  are 
available  from  previous  steps.  Circled  points  indicate  fl 
new  integrand  evaluations.  The  subdivision  logic 
within  the  Simpson  algorithm  Is  detailed  sore  fully  r» 

in  Figure  4.2.  tl 


D 

fl  £ 
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The  subdivision  Mqatnc*  within  the  adaptive  Slnpaon 
algorltha  la  shown  la  aors  da  tall  la  figure  4.2.  The 'broken  11ns  a 
sneloss  the  toru  which  ars  avalnatsd  for  a  given  snbdl vision. 
Haw  function  avalaatloaa  ars  la  Host  a  d  by  tha  circles  wfalls  the 
function  avalaatloaa  that  havs  bean  aada  at  a  pravloua  level  of 
subdivision  are  Indicated  by  the  vortical  Haas.  The  symbols 
for  tha  la to (ration  approximations  are  those  defined  by  equations 
(4*6)  and  (4*11)  with  tha  dspandaaea  on  z  and  hxp  omitted.  Bote 
that  tha  adaptive  late (ratio a  Is  aov  performed  over  tha  laterval 
*°  ^ 

AZj.  *  <x1+.1-x^/2r“1  .  (4.3 3) 

(in)  Hei,(taT» 

la  practice,  tha  absolata  error  crlterloa,  Is 

replaced  by  tha  relative  error  crlterloa  do  fined  by  equation  (4*3). 
Tha  logic  described  la  tha  previous  sections  than  applies  If 
is  replaced  by  the  B.H.5.  of  equatloa  ( 4* 4) *  (Lynnes1^). 

The  adaptive  integration  algorltha  coded  here  can  accept  two 
error  criteria,  6.^^  sad  The  crlterloa  (  C.  or  £abs  }  ** 
equations  (4.13)*  (4.25)  and  (4.32)  are  replaoed  by  t'  where 

e'  -  naxU.*..  ^juCxNdx}.  (4.34) 

asaalag  that  the  weaker  of  the  two  conditions  is  taken. 

Tha  absolute  criterion  is  used  only  when  a  given 


algorltha  Is  belag  used  to  evaluate  an  inner  integration  of 
a  aaltiple  Integration  and  oaa  not  be  set  explicitly. 
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Figure  4.2.  Schematic  representation  of  the  sequence  of 

subdivisions  made  by  the  adaptive  Simpson  integration 
algorithm.  At  each  level,  the  circled  points 
indicate  new  integrand  evaluations  for  that  level. 


As  already  mentions d,  th»  integral  tara  la  (4*34)  i« 
kaova  only  approximately  daring  the  adaptive  integration.  The 
estimate  la  updated  continuously,  la  Initial  estimate  is  mads 
after  the  Integrations  osar  the  initial  subdivisions  have  been 
completed,  i.e. , 

fb  m-i 

i«*>t  <x  =»  rn’l  <%•»> 

The  code  ensures  that  1^5  «  that  at  least  9  Integrand 
evaluations  are  used  to  aake  the  initial  eatlmate.  If  insufficient 
initial  subdivision  nodes  are  specified  then  5  equally  spaced  nodes 
are  automatically  generated* 

If  the  estimate  in  equation  (4*33)  is  numerically  insignificant' 
(  <  10-52)  integral  is  assumed  to  be  aero  and  no  further 

calculations  are  made* 


(I*)  Adaptive  subdivision  logic 

examination  of  figure  4.2  reveals  that  failure  to  satisfy 
condition  (4*23)  tor  any  interval  necessitates  subdivision  to 
generate  2  new  intervals  involving  4  mas  Integrand  evaluations. 
Taking  the  subdivision  resulting  from  the  failure  of 

and  Sj  to  satisfy  (4.23)  for  the  Interval  Ax^,  two  new 
intervals  of  length  ax2  *re  <• aerated. 


tvt- 


2 

la  the  process  of  generating  for  each  interval, 
the  eatiaatea  Sj  are  also  generated.  Either  of  the  teo 
oxj,  intervals  nay  fail  to  satisfy  (4.23):  the  parti  col  ar 
interval  is  subdivided  again.  The  process  is  continued  until, 
generally,  (4.23)  in  satisfied.  If,  at  any  level,  both  Intervals 
fail  to  satisfy  (4.23),  then  the  interval  for  which  the  difference 
between  Sj  and  S*  is  the  greater  is  subdivided  first.  Ihe 
other  Interval  remains  as  a  eandltate  for  subdivision  at  a 
later  stage. 

Subdivision  cannot  continue  indefinitely.  In  the  BEBF 

algorithms  subdivision  ceases  when  r  reaches  a  specified  maximum 

level  (selected  by  the  user).  Space  allocation  within  the 

integration  cods  limits  this  maximum  to  30*  80  that  the  smallest 

Interval  will  be  u.  (x^-x^)  *  1.86  10**®. 

In  practice,  the  precision  of  the  computer  imposes  a  limit  to 

«7 

the  possible  level  of  subdivision.  Lyness  detected  problems 
arising  from  numerical  roundoff  by  examining  the  sequence  of 
estimates,  Sj  for  a  given  interval.  Departure  frou  a  monotonia 
approach  to  a  limit  was  taken  as  an  indication  of  roundoff  errors. 
In  the  present  algorithm,  subdivision  ceases  when 

A*,  <  (b  -  a  >*10-7  (4.36) 

The  decisions  made  during  the  adaptive  subdivision  follow  tho 
logic  shown  in  Figure  4.3* 


The  evaluation  of  a  single  Integral  is  controlled  by  the 
function  sub-pro graa  JLDAPT2.  This  function  Is  the  lowest  In  a  hierarchy 
of  three  functions,  ADAPTO,  ADAPT  1  and  ADAPT2  designed  to  evaluate 
■ultlple  integrals.  In  principle,  each  could  be  used  for  a  single 
Integration,  but  ADAPT2  involves  the  least  additional  code  and, 
therefore,  superfluous  computation. 

These  'main  routines'  are  supported  by  the  following  subroutines. 

ADASET  sets  up  constsnts  used  by  the  three  functions  and 
Initialises  parameters  which  depend  on  the  desired  error 
criterion.  (Bote  that  the  seme  error  criterion  is  used  by 
all  three  intergrating  functions. ) 

ERfiOOT  writes  error  or  warning  messages  as  triggered  by 
any  of  the  three  main  routines. 


IH7ST  (and  entry  points  I2TILS1,  IHFLK2  and  IHFSUP)  together 
with  IHFIBT  write  data  regarding  the  overall  evaluation 
of  an  Integral. 

Only  ADAS  ST,  SSSODT  and  ADAPT2  will  be  described  in  this  . 

section.  The  remaining  functions  and  subroutines  will  be  described 
following  the  discussion  of  the  techniques  used  for  multiple  Integration,  'j 

Each  of  the  Integrating  functions  assumes  that  a  suitable  ] 

Integrand  function  Is  available.  The  name  of  this  function  Is 

j"  I 

passed  as  a  parameter  to  the  Integrating  function.  I  ! 


li>7 


For  example ,  sappose  the  adaptive  Integration  function 
ADAPT2  ia  to  be  used  to  evaluate 

*2  <ix  .  (4.37) 

A  function  sub-program  SqjBX(X)  supplies  the  square  of  X.  The 
essential  code  to  evaluate  the  Integral  is; 

BXTBRBAL  SQRX;  Identify  SQBX  as  a  function  to  be  passed  as 
a  parameter. 

C ALL  ADASST(.OOI);  Set  the  relative  error  criterion  to  .001. 

ABSw  AH*PT2(SQBXf  1. 0,5.0, DCM,0,  'SQ ]BX*,  »X' , I.O.EREOH) 

The  parameters  in  the  call  are  Identified  below.  The  value  of  the 
Integral  Is  returned  as  the  value  of  the  function  and  the  error 
estimate  (absolute).  Essential  Information  regarding 

$he  progress  of  the  integral  and  final  counts  of  function 
evaluations  will  be  sent,  via  the  subroutine  PROMPT,  to 
the  oontrol  terminal  and  to  logical  unit  number  4* 


it# 


nracnoif  adapt2(f,  xmik  i  ,  mix  i ,  xp  i ,  ro>  i ,  fi fig,  vabham,  fctb,  ebbor) 

ADAFT2  returns,  aa  the  valaa  of  the  function,  tbo  integral 

r‘ 

I(«,W  *  )  fC x)te. 

J  A 

The  function  ADAPT2  is  configured  to  operate  as  either  a  single 
Integration  algorithm  or  the  Inneraost  Integration  of  a  multiple 
Integration  algorithm. 

Zvm&vM,** 

F:  Function  defining  the  Integrand,  f(x). 

XMI1T1:  lower  Unit  of  integration,  a. 

XMAX1  j  Upper  Unit  of  Integration,  b. 

XPIt  Array  containing  posalble  boundaries  for  initial 
subdivisions. 

HP1:  Humber  of  values  In  XP1.  If  HP1  Is  greater  than  2  the 

values  In  XP1  must  eneaq?ass  XMIH1  and  XKAX1.  If  HP1  Is  lei 
than  3,  ABAPI2  sets  up  five  equally  spaced  nodes  for 
the  initial  subdivision. 

FIHIOi  Five  character  string  identifying  the  integrand 
TABHAMt  five  character  string  identifying  the  Integration 
variable. 

FCTB:  Factor  by  which  the  Integration  is  to  by  sultlplled  by 
to  form  the  integrand  for  the  next  level  of  integration* 
For  a  single  integration  FACXHst.O. 

BBBORi  Returned  value  of  the  error  estimate  multiplied  by  FCTB. 


Control  Parameters  Stored  In  Comaon 


The  following  variables  exercise  control  over  the 
adaptive  Integration  algorithm. 

9VM1X  :  (In  I3F0B2)  Seta  tha  aazlaaa  number  of  Integrand 

avalaatlona  to  be  used  In  any  single  integration  step, 

MAXLSV:  (in  IHP0B2)  Seta  the  aaxiiaa  level  of  snbdlvialon 
(l.e.  naz  valne  of  r)  need  by  the  adaptive  Slapaon 
algorltha. 


Operation 

the  function  AD1PT2  eonaiata  of  two  main  sections.  The  first 
sets  up  the  Initial  subdivisions  according  to  the  nodes  stored 
in  ZP1.  the  Initial  Integrations  are  then  Bade,  as  described  In  Section 
4. 1.2  part  (11),  and  outlined  scheaatloally  In  figure  4. 1. 

the  second  section  perforaa  the  adaptive  Sinpson  Integration 
according  to  the  logic  described  In  Sections  4*1*1  and  4*1*2  part  (lv). 

Shis  function  is  largely  free  of  cede  associated  with  the 
interfacing  for  multiple  Integration,  the  essential  section  of 
such  code  is  at  the  beginning  of  the  function.  If  either  outer 
integration  function  (ADAPTO  or  ADAPT 1 )  is  currently  active,  an 
absolute  error  criterion  is  calculated  (see  Section  4. 1*4)* 


the  three  adaptive  integration  functions  are  the  largest 


sub-programs  la  the  ICERF  coapater  program*  Zt  la  not  practical 
to  detail  the  operatloa  of  the  FORTRAN  code  more  than  haa  already 
been  done  la  Sec tloaa  4*1*1  aad  4*1*2*  A  complete  llat  of  variables 
appearing  In  the  code  la  given  Table  4*1.  Thia  should  assist 
the  prograaaer  to  relate  the  eode  to  the  aatheaatleal  description. 
Note  that  major  statement  nombers  have  been  Included  In  Figure  4.3* 


Figure  4.4*  shows  the  major  program  variables  associated  with 
obtaining  the  Simpson  rule  Integration  estimates  for  the  subdivisions. 
The  storaga  of  Integrand  evaluations  Is  described  schematically 
In  Figure  4.5. 

Note  that  Table  4* 1*  does  not  list  variables  In  ADAPTO  and 
ADAPT  1  that  are  associated  with  the  accumulation  of  error  terms 
for  multiple  Integrations.  Seme  variables  and  eoaon  blocks  end 
with  a  number  (0, 1  or  2).  Ia  the  table  these  names  end  with  2; 
similar  descriptions  apply  for  variables  or  common  blocks  ending 
with  the  other  numbers. 
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Figure  4.4.  Program  variables  and  arrays  associated  with  the 

integration  estimates.  This  figure  should  be  sudied 
in  conjunction  with  Figure  4.2. 
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Figure  4. ?.  Program  variables  and  array  names  associated  with 
the  storage  of  integrand  values  used  to  make 
estimates  of  the  integrations  over  a  J'th  level 
.  subdivision.  New  values  are  stored  in  the  Y(I,«J) 

array.  Existing  values  are  stored  in  the  YLOW, 

YMID  and  YHIGH  arrays  and  the  variables  Yl  and  Y2, 
These  values  are  linked  to  Y(I,J)  values  at  previous 
levels  as  shown.  (The  level  for  each  existing  value 
is  indicated  on  the  right  hand  side  of  the  diagram. 
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Variables  Used  ia  the  Adaptive 
Integration  functions  -  ADAPTO, 
ADAPT  1  «ad  ADAPTS 


IBM 

Location 

ADPT(i) 

Local 

Logical  flag  Indicating,  if  true,  that 

the  interval  lx.  ,x.  J  require*  adaptive 
integration.  ^  ^  1 

ASS 

Local 

Current  ootiaato  of  the  overall  Integral. 
ASS  mln(a,b). 

BIT 

Local 

0. 25Axp  *  .25*0X1. 

C4D3 

AOAOOM 

4/3.  aot  bp  AOASXT. 

CTOBO 

TESTIS 

Logical  flagj  if  true  AOAPTO  ia  perforala. 
an  outer  integration* 

CURB1 

TKSTIH 

Logical  flag;  if  true  ADAPT  1  is  perforaln. 
an  outer  Integration* 

DUN 

Local 

ftua?  var aible,  used  for  unwanted 
parameter  in  call  to  MEBQE. 

DX 

Local 

Vi  -  V 

0X2. 

Local 

(*Vl  -  *^)/2. 

OXB 

Local 

-  xt)/(b-a). 

M(J) 

AOAOOM 

15/2** W-2);  1(1)3.15.  For  use  in  applying 
equation  (4*13). 

IPS 

AOACOM 

Vel*  error  criterion. 

XPSAB 

Local 

Ve*  *h®ola**  oxror  criterion* 

KPSABT 

Local 

taba(xivrsi)/(W)  »  *•••  883  of  (4.32). 

KPSIST 

Local 

£rel(xiH~Xi)/(b”a)  *  Ibr  ooaputing 
relatrl#  equivalent  of  BBS  of  (4.32). 

XHE1 

Local 

s|(x,axr)  -  «J(x,ax^)  for- the  first 

Interval  of  a  new  subdivision. 

XBB2 

Local 

As  above  for  seoond  interval. 

BBBSST 

ZBT0B2 

Abbsolute  error  estinate  returned 
by  the  function.  Used  by  IKFIHT  in 
ooaputing  relative  error. 

K8BMAX 

Local 

Maximum  value  of  SBTBAP(l). 

BSfiOB 

Par  motor 

SBSKAX’fCTB.  Returned  to  eeVHng  code. 

Table  A. 1.  Continued 


Maac 

Location 

— 

XBTBiP(I) 

Local 

iTj(x1,xi  r**)-*^*!**!  rV,/5* 

*ST(K,J) 

Local 

Sj*'(x,xrt>j)  value  a  for  the  r'th 
subdivision.  (r+1  *J) .  Saa  figure  4.4. 

ISTV(I) 

Local 

S3(xi*x1i-r3S.)* 

sxot 

Local 

Error  aatiaata  for  adaptive  integration 
over  the  interval  ^xi*xi+-i3*  1,1 

aquation  (4.24)0 

P 

Parameter 

Function  of  X.  Integrand  function. 

FCTH 

Local 

Factor  for  error  tan  in  aultlple 
integration  interfacing.  Saa  Section 

4.  1.3. 

Finta 

Paraaeter 

Five  character  string  identifying 
the  integrand. 

FIBTOO 

TSSTIH 

Five  character  string  identifying 
tha  integrand  for  ADXPTO. 

FIRQ1 

TSSTIS 

Five  char  actor  string  identifying 
tha  integrand  for  ADAPT  1. 

I 

Local 

Index*  identifying  x^. 

I  FIS 

Local 

Integer*  identifying  error  condition. 

See  XBBOUT. 

IMAX 

Local 

Identifies  interval  3^ ^having 

largest  value  of  SBTBiP(i). 

ISP 

Local 

Indicates  sequence  for  treating  initial 
Intervals  for  further  processing.  IUP«0, 
increasing  I*;  I OP  si,  decreasing  I. 

J 

IHF0B2 

Current  level  of  subdivision.  J*r+1. 

JOFP1 

Local 

Offset  used  for  T1.  See  figure  4.3* 

JOFF2 

La  eal 

Offset  used  for  T2.  See  figure  4.3. 

KOFF(J) 

Local 

Indicates  vhleh  interval  at  the  J'th 
level  is  being  subdivided.  KO FF(J)»0, 
lover  Interval;  K0FF(J)a2,  upper. 

KOOHT(J) 

Local 

Suaber  of  intervals  at  the  J'th  level 
that  have  been  processed. 

UMAX 

IHT0R2 

Manaus  level  reached  daring  adaptive 
integration. 

MAXBIV 

Local 

Maxlaua  subdivision  level,  as  dictated 
by  storage  allocation.  Currently  30. 

MAXLIV 

IHF0B2 

Maxlaua  subdivision  level,  as  set  by 
user.  Overwritten  if  greater  than  MAXDIV. 

r* 


4i  L. 


Bsma 

Location 

Significance 

MAXHOD 

Local 

Maximum  noabor  of  initial  sob di vision 
nodoo  as  dictated  by  storage,  Corrontly 
50, 

BP 

ADACM2 

Amber  of  initial  subdivision  nodes, 
as  set  by  the  algorithm. 

HP1 

Parameter 

Amber  of  nodes  in  API  from  which 
initial  subdivision  nodes  can  be  selects' 

5VALS 

IBF082 

Current  amber  of  function  evaluations. 

1TVHAX 

IBF0B2 

Maximum  number  of  function  evaluations 
for  a  given  call  to  A  LAP?  (o,l  or  2), 
as  set  by  user. 

OOTEB 

Local 

Logical  flag,  if  true  then  the  function 
ia  evaluating  an  outer  integration. 

H3 

ADACOM 

1/3. 

B12 

ADACOM 

1/12. 

B12K1 

Local 

AX^/12  »  (s^-^J/afVlX. 

SDMI 

Local 

s|(x,4xp)  for  the  lower  interval  at  the 
J'th  level.  See  figure  4.4. 

SDM2 

Local 

Sj(x,dxr)  for  the  upper  interval  at  the 
J'th  level.  See  figure  4.4. 

TBST 

Local 

1.  BBS  of  equation  (4*32),  trapezoidal 

• 

integrations. 

2.  BBS  of  equation  (4.13)*  adaptive 
Simpson  integrations. 

TBSTAB 

Local 

Integral  term  in  (4.34)*  (latest 

estimate. 

nest BP 

Looal 

BBS  of  equation  (4*34). 

TX8tZO 

ZXSTZB 

Pastor  used  in  computing  absolute 
error  criterion  from  AMPTO  integration. 
(See  Section  4.1.3.) 

TXStll 

TXSTIB 

Factor  used  la  computing  absolute 
error  criterion  froa  ADAPT  1  integration. 

*2(xi,,lH"xi)* 

tbapi 

Local 

TBAP2 

Looal 

VARHO 

TXSTIB 

3  Character  string  identifying  the 
integration  variable  for  ADAPTO. 

VABH1 

T1SSZB 

3  Character  string  identifying  the 
integration  variable  for  ADAPT 1. 

VABBAH 

Par  Motor 

3  Character  string  identifying  the 
integration  variable  for  the  current 
integral. 

Tabl«  4.1. 


Coating* d 


Sass. 

Location 

fj  cjflgo 

VAKOI 

Looal 

Unsay  variable  used  to  pass  aworlcal 
data  to  XBfiOOT. 

VAS02 

Local 

As  above. 

XI 

Local 

Low  point  of  current  interval  being 
pro ceased  by  the  adaptive  Slapson 
Integration.  XI  * 

XCUBO 

TXJSUK 

Current  value  of  the  Integration 
variable  for  ADAPTO. 

XCTO1 

txstiir 

Current  value  of  th*  integration 
variable  for  ADAPT  1. 

HUT 

Local 

(b»e). 

XL(J) 

ADllCOM 

1/2^”'  or  1/2^ ,  used  to  eaXooloto 
“r* 

XLOW(J) 

Local 

Current  x  location  of  the  low  end 
of  the  Interval  at  th*  J'th  level. 

See  figure  4*4. 

MAX 

Local 

Internal  value  of  b. 

XM 1X1 

Parameter 

Value  of  b  passed  Into  function. 

XMXH 

Local 

Internal  value  of  a. 

XP(I) 

ADACM2 

So  dal  values  for  Initial  subdivision, 
as  set  within  th*  function. 

xpi(i) 

Par  wo  tor 

Nodal  values  froa  which  th*  nodes  for 
Initial  subdivision  can  b*  selected. 

Y(K.J) 

Local 

Values  of  the  Integrand  function  at 
the  J'th  level  (4  values).  So*  figure 
4.5. 

11 

Local 

Integrand  value  retleved  froa  previous 
level.  See  Figure  4.5. 

1 2 

Local 

As  above. 

THIOH(J) 

Local 

Integrand  value  at  th*  high  end  of 
th*  J'th  level  Interval,  see  figure  4.5. 

ILOW(J) 

Local 

Integrand  value  at  th*  low  end  of 
th*  J'th  level  interval,  see  figure  4.$, 

JM(I) 

ADACM2 

Integrand  value  at  (^4.  )/2 

ms(J ) 

Local 

Integrand  value  at  th*  alddl*  of  the 
J'th  level  Interval,  see  figure  4.5. 

ipU) 

ADACM2 

Integrand  value  at  j^. 

H7 


SUBROUTINE  ADAS ET (EPS  1 ) 
Function 


Subroutine  ADASET  initialises  the  constants  and  parameters 
used  by  the  adaptive  integration  routines,  ADAPTO,  ADAPT  1  and 
ADAPT2.  These  constants  are  either  fixed  for  the  duration  of 
all  the  calculations  performed  by  the  integration  routines  or 
are  such  that  ADASET  simply  defines  appropriate  Initial 
val ues . 

Parameter  List 

EPSls  Relative  error  criterion  to  be  used  by  the  adaptive 
integration  algorithms. 

Operation 


The  variables  which  remain  fixed  are  stored  in  the  COMMON 
block  ADACOM  and  are  given  the  values  defined  below. 

XL(1):  (Interval  length  array);  1.0 

XL(J):  (Interval  . leng th  array;  1.0/2  for  J  •  2  to  30. 
E(l):  (Error  test  scale  array);  15.0. 

E(J):  (Error  test  scale  array);  15.0/2J  ^  for  J  *  2  to  J  •  30. 
R3;  1/3. 

R12;  1/12. 

C4D3;  4/3. 


EPS:  (Relative  error  criterion);  that  stored  in  EPS1. 
Variables  that  are  given  initial  values  are  stored  in  the 


COMMON 

block  TESTIN 

and  are 

given  the 

following 

TESTI0: 

(Error 

test 

factor 

for 

ADAPTO) 

• 

o 

• 

o 

TZSTI1: 

(Error 

test 

factor 

for 

ADAPT  1 ) 

;  0.0. 

17? 

XCUR 0 :  (Current  value  for  the  argument  of  ADAPT 0 ) ;  0.0 

XCUR1:  (Current  value  for  the  argument  of  ADAPT1);  0.0 

CURRO:  (ADAPTO  active  flag);  false/ 

CURR1:  (ADAPT  1  active  flag);  false. 


SUBROUTINE  ERROUT (NOADPT , IF  IN , F INTG , VARNAM , VARO 1 , VARO  2 ,  XP  ,  YP  ,  YM , NP) 
Function 

ERROUT  constructs  appropriate  error  messages  according  to 
the  value  of  the  termination  flag,  IFIN.  The  message  contains 
information  stored  in  the  remaining  parameters  in  the  call. 

Parameter  List 

NOADPT:  The  number  of  tha  adaptive  integration  calling  ERROUT. 

(e.g.  for  ADAPT  1 ,  NOADPT-1.) 

IFIN:  Termination  code.  (See  definitions  in  'operation' 
below. ) 

FINTG:  5  character  text  string  identifying  the  integrand 
function  . 

VARNAM:  5  character  text  string  identifying  the  integration 
variable  . 

VAR01:  First  numerical  value  to  appear  in  the  error  message. 

VAR02:  Second  numerical  value  to  appear  in  the  message. 

XP :  Array  of  nodal  values  of  the  integration  variable. 

YP:  Array  of  nodal  values  of  the  integrand. 

YM:  Array  of  integrand  values  at  points  midway  between  the 
nodes  . 

NP :  The  number  of  nodes  in  XP . 


Operation 


The  message  consists  of  two  parts.  The  first  part 
Identifies  the  adaptive  integration  routine  in  which  the  error 
has  occured  and  the  status  of  any  other  routines  that  are 
currently  active.  The  second  part  displays  information  that  is 
relevant  for  the  particular  error  that  has  been  detected. 


i?o 


f 


The  first  line  in  the  first  part  of  the  error  message  has  the 
ora, 

iT-  • 


'*****  ERROR  IN  ADAPT*  USING  *****  OVER  *****' 


where  the  parameters  NOADPT ,  FINTG  and  VARNAM  are  used  to  fill 
the  gaps  in  the  message  appropriately.  If  the  integration  is 
an  inner  integration,  two  more  lines  may  appear.  These  have 
the  form, 

'ADAPT  *;  *****;  *****  >  ***** 

and  identify  the  status  of  the  outer  levels  of  integration. 

For  example,  an  error  in  ADAPT2  while  under  the  control  of 
FBET,  could  produce  the  following  message. 

*****  ERROR  IN  ADAPT  2  USING  FALP  OVER  ALPHA 
ADAPT  1;  FBET;  BETA  -  2500 
ADAPTO;  FRLTO;  A  -0.56 


The  second  part  of  the  error  message  is  constructed 
according  to  the  type  of  error  that  has  been  detected  and  is  set 
by  the  value  of  IFIN  as  described  below. 

(i)  IFIN  -  1 

The  space  allocated  in  the  adaptive  integration 
routine  for  the  storage  of  nodal  values  of  the 
integration  variable  has  bedn  exceeded.  (Currently  50 
nodal  values  are  provided  for.)  The  message  transmitted 
is  , 


'NODAL  STORAGE  LIMIT  OF  ****  EXCEEDED' 
where  VAR01  provides  the  number  of  storage  locations 
available  in  the  adaptive  integration  routine.  The 
error  is  fatal  and  the  program  is  terminated. 


#. 


The  groups  of  stars,  other  than  that  at  the  beginning 
of  the  messeage  indicate  numbers  or  strings  inserted 
at  the  time  the  messeage  is  created. 


m 

(ii)  IF  IK  -  2 

The  lower  limit  of  integration  is  greater  than  any 
node.  Because  the  node  sequence  is  used  to  vignet  the 
integration  interval,  this  condition  probably 
amounts  to  an  error  in  the  code  calling  the  adaptive 
integration  routine. 

The  error  message  is, 

* XM IN  (****)  GREATER  THAN  LARGEST  NODE' 

where  the  value  of  the  lower  limit  is  provided  by  VARO 1 . 
The  error  is  fatal  and  the  program  is  terminated. 

( iii)  IF  IN  -  3 

The  limit  for  the  number  of  integrand  function 
evaluations  allowed  for  a  given  integration  have  been 
exceeded.  The  error  message  is 

'****  FUNCTION  EVALUATIONS  EXCEEDED' 

where  the  limit  for  the  number  of  function  evaluations 
is  provided  by  VAR01. 

This  error  message  is  followed  by  dumps  of  the 
contents  of  the  XP ,  YP  and  YM  arrays.  (The  format  of 
these  dumps  is  dictated  by  the  subroutine  ARROUT.) 

The  error  is  fatal  only  after  10  occurrences . 

(iv)  I FIN  -  U 

The  error  estimate  made  by  the  adaptive  Integration 
routine  is  larger  than  the  relative  error  criterion 
uspecifled.  The  error  message  is 

'ERROR  (*****)  GREATER  THAN  REQUESTED  (****)' 

where  the  error  estimate  and  the  specified  error  are 
provided  by  VARO 1  and  VAR02  respectively. 


GHb  Nf  Rf  A  COMPUTER  PROGRAM  FOR  IMF  NUMERICAL  EVALUATION 
CM  RELIABILITY  FUN  IU)  AERONAUTICAL  RESEARCH  LABS 
MflflOURNF  (AUSTRAL  Ul  G  D  MAI  l  IN  SON  E  T  AL  .  SEP  83 
I  Fill)  AHL/STRUC  397 _ f  /r(  q/p 
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The  error  is  non  fatal  and  control  is  returned  to  the 
calling  code. 

(v)  IF  IN  -  5 

The  upper  limit  of  integration  is  less  than  any  node. 
This  error  is  similar  to  IFIN  ■  2  above. 

(vi)  IFIN  -  6 

Subdivision  of  the  integration  domain  has  been 
limited.  The  subdivision  strategy  used  by  the  adaptive 
integration  routines  is  limited  by  either  a 
specification  for  the  number  of  subdivision  levels  or 
by  the  effects  of  roundoff  errors.  The  error  message 
is  , 

' SUBDIVISION  LIMITED  X  -  ****  LEVEL  -  ****' 

where  the  value  of  X  and  the  level  at  which  the 
subdivision  stopped  are  provided  by  VARO  1  and  VAR02 
respectively. 


The  error  is  not  fatal 


4.1.3.  Multiple  integration  •  error  oonalderatlona 


neglecting  time  dependence,  the  reliability  functions 
•▼alaatad  by  SERF  have  tha  most  general  fora* 

(*2  f7  rx2(y,s) 

F_(*)  1  F(y, z)  I  F(x,y,  a)  dxdydz.  (4.38) 

*,  *  J  y,(»)  7  J  x^y,*)  * 

this  axpraaalon  can  ba  dseoapoaad  aa  tha  following  aaatad 
Integration  sequence) 

f‘2 

H  =  I  («)  da  ,  (4.39) 

N  * 

ry2(*) 

!_(»)*  F  (a) I  I-(y.*)dy, 

*  *  Jy,(*)  7 

tXgCy.a) 

.  F  (x,y,z)dx  . 
x^(y»a)  * 

tha  aaltlpla  Integration  eaa,  la  principle,  ba  handlad  by  a 
recursive  saquaaea  of  calla  to  tha  saaa  single  integration 
algorithm,  FOBtBAH  doaa  aot  paralt  ra coral to  calls  to  sab-programs, 
bat  tha  sent structure  eaa  ba  astabllshad  by  having  3  eoplas  of 
tha  saaa  latagratloa  faaetloa,  aach  coatrolllag  a  given  level 
of  latagratloa,  larly  versions  of  tha  SB8F  computer  program  did, 
la  faet  have  this  a  true  tore,  tha  throe  fuaetloas  AMPTO,  ADAPT 1 
aad  ADAPT 2  ware  exact  eoplas  of  eaeh  other  aad  each  level  of 
latagratloa  vas  controlled  to  tha  same  relative  error  criterion, 

a 

As  tha  following  argument  will  eoaelude,  this  approach  lad 
to  a  wasteful  (if  aot  accurate)  latagratloa  algorithm  for  aaltlpla 
Integrals,  Considerable  Improvements  la  computational  efficiency 
could  ba  obtained  If  attention  was  given  to  the  Interfacing  between 
the  Individual  alagla  latagratloa  algorlthas  to  form  a  aultlple 
Integration  a  qua  nee. 


(4.40) 

(4.4D 


Consider  the  outersoat  integration, 

f*2 

H-l  Iz(,)da  x  Ki^ij)  (4*42) 

'*1 

and  forgot, for  tho  tine  being, that  the  evaluation  of  I^( *) 
involve*  further  applies tlon*  of  the  integration  algerltha. 
Instead,  regard  the  numerical  evaluation  of  Iz(s)  as  a  process 
which  returns  an  approximate  value  which  ia  within  a  controlled 
error  bound  of  the  correct  result. 


Generally,  the  result  returned  by  the  integration 
algorithm  is  in  error;  IgCn^Sg)  1*  returned  where, 

*  IC*1»«2)  *  Laet  (4.43) 

and  la  the  actual  error  incurred  during  the  nunerlcal 

integration. 


Boraally,  6aet 
ia  the  algorltha. 


is  bounded  ia  none  way  by  the  safeguards 


I  — 


net  '  —  ia 
being  a  nunerlcal  paraneter  of  the  algorltha  which 

is  deeaed  to  bo  ' reliable 1  if  equation  (4*44)  applies  to 

every  result  produced  by  the  integration.  In  any  practical 

algorltha  there  are  several  sources  of  error: 


(4.44) 


(1)  truncation  errors  associated  with  the  integration  rule; 


(11)  errors  in  the  evaluation  of  the  integrand  function; 


(ill)  round-off  errors  caused  by  the  finite  precision  of  the 


iputar,  occurring  at  each  arithmetic  operation; 


/fcr 


(It)  non-oyateaatl c  errors  resulting  from  failure  of  the 
Integration  algorithm's  loglo  to  cope  with  unusual 
properties  of  the  integrand. 

Of  these  contributions,  the  first  two  will  be  assumed 
to  be  dominant.  The  third  contribution  is  Important  if  high 
levels  of  aceuaraey  are  required,  normally,  the  reliability 
functions  evaluated  by  HBF  are  required  to  an  accuracy  of 
.01%  to  .1%.  Bound-off  errors  associated  with  eight  figure  operations 
are  assuned  to  be  at  least  an  order  of  magnitude  below  this  level. 
Ron-systematic  errors  are  expected  to  be  gross  in  nature  and 
detectable  by  the  algoritha  itself  or  obvious  from  discontinuities 
in  the  computed  functions.  Certainly  this  has  been  so  for  the 
errors  that  have  been  detected  to  date. 

The  second  contribution  can  be  represented  by  writing, 

(4.45) 

where  l^  is  the  integrand  function  returned  by  the  numerical 
evaluation  procedure  and  ^(i)  la  the  actual  error  associated 
with  a  particular  evaluation.  Irrora  associated  with  the  integration 
rule  can  be  lumped  together  as  an  additive  error  which 
will,  in  general,  be  sensitive  to  changes  la  I#(s)  and  hence 
will  depend  on  the  numerical  estimates  supplied  by  the  integrand 
evaluation  algorithm.  This  nonlinearity  will  be  ignored  so 
that  the  numerical  value  returned  bar  the  overall  integration 
algoritha  can  be  represented  by, 


(4.46) 


Ia(z)+*r(a))  da 


+  €. 


The  actual  arror  la  glvan  by, 


met 


(z)dz  +  £ 


(4.47) 


It  is  eaaentlal  for  tba  roll ability  of  tho  Integration  procedure 
that, 

1  j  £r(a)da  f  \\  *  \tt  •  (4.48) 

*1 


How, 


t ^(z)dz 


da 


4  l£lt.«l.lv*il  •  <«•«> 

by  the  aeon  value  theorea.  (  ^2(aaz  1*  the  aazlatta  of  Ez(z) 
over  [z1 ,  *21.)  without  wore  lnforaatlon  regarding  the  nature 
of  the  function  f^(a),  (4.49)  repreaents  an  eatlaate  for  the 
upper  bound  for  the  aagnltude  of  the  error  reaultlng  froa  the 
ewaluatlea  of  the  Integrand  function. 


laauae  now,  that  the  lntegratlca  rule  anaoree  that 
ltBl  &  tia  and  the  Integrand  la  evaluated  within  an  abaolute 
error  criterion,  governed  by 


(4.50) 
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1 

r*2  j 

«...  S| 

2  z(z)ds  4-  ( 

*1 

4 

IMV‘,1  \ln\ 

2  ‘in  • 

(4.50 

If,  on  tho  other  hand*  relative  error  criteria  are  used, 

f2 

*a  ^  €reli  l  X^*)!  da  (4.52) 

*1 


and 


(4.55) 


then 


r*2  r*2 

s  *  Va  IV*>I 

f*  2 

i1*1 


dz 


(*)\  da.  (4.54) 


Sanation  (4.54)  la  the  justification  for  a  ala*  a  nest^  integration 
proeeaa  where  eaoh  integration  la  controlled  bj  a  relative  error 
criterion  equal  to  where  H  la  the  nnaber  of  integration 

levela. 


If  Aquation  (4.52)  la  retained,  bat  (4.53)  replaced  by, 


£z  ~  £rel  j  j  I#(»)|  d*  /|*2“*tl  (4.55) 


then. 


£«ct  £  \  IV*>1*  *»  +£* 


<p  l1*<*,ld*  £aall»2-»ll  f  £r.r2  IV*^ 

J*- 


^  2( 


:elj  lX»* 


2*reJ  • 


(4.56) 


There  nay  be  significant  sections  ef  the  Interval  C*j » *2”^° 


which. 


[i,(.)l  < 


O 


(*){d*/|*2-x1j 


(4.57) 


and  (4.55)  represents  a  none liberal  error  criterion  for  Integrand 
evaluation  while  still  satisfying  the  overall  error  criterion. 

Likewise,  if  the  inequality  la  (4.57)  la  reversed,  (4.53)  represents 
the  aore  liberal  criterion,  icoorlngly,  the  Integrand  evaluation 
criterion  be  cones, 

««x 


and  offers  conalderahle  gains  la  coapntatlonal  efficiency,  bat 
little  loss  In  overall  aeeoraoy  over  either  (4.53)  or  (4. 55), 


Returning  sow  to  the  situation  where  Iz(z)  la  defined  toy 
aquation  (4.40),  &%  a a  da fined  toy  aquation  (4,58)  applies 

to  tho  evaluation  of  tho  RHS  of  (4.40)  whloh  lneludoa  tho 
function  F£(z)  a a  vail  aa  an  integration  over  y.  ng  that 

tha  errors  aaaodatad  with  tha  evaluation  of  F  (x)  are  insignificant 

t$ 

compared  with  thoaa  aaaodatad  with  tha  Integration  than  (4.58) 
can  too  aatlaflad  If  tha  Integration  algorltha  la  applies  with 
£abs  la  aquation  (4*34)  raplaead  toy  E.  ^  where 

£z,atoa  "  ^lf^l^CnJldn /lz2-z1l/lF#(z)».(4.59) 
'*1 

Similarly,  for  tha  Integration  ovar  z  la  aquation  (4.41 )»  ^^g 

— b*  ”pl*“4  lT  S.*. 

p2(z) 

e7fd,.  -  S*J  U)[yy>»)(  .  (4.80). 

1  |y2ls)-y1(z)l.|jry(y,*)| 

la  each  ease,  tha  Integral  tarn  la  approximated  within  tha  algorltha 
which  applies  tha  latest  estimate  before  eaoh  application  of  (4*34). 

It  la  stressed  hare  that  aquations  (4*39)  and  (4.60)  are 

applied  to  derive  parameters  whloh  control  the  auto division  loglei 

as  such  they  do  not  necessarily  ensure  that  overall  satisfaction 

of  equation  (4.44)  la  always  achieved.  For  this  reason,  the 

Integration  algorlthns  nust  produce  an  estimate  of  Fash 

single  Integration  algorltha  can  produce  an  estlaate  of  £•_  for 

that  particular  level  Denoting  that  for  the  x  and  y  levels 

toy  £a  x(y,z)  and  yU)  respectively,  the  estimate  for  the 

overall  error,  £  ^ ,  Is 
«s *  * 


£..t  -  £» 


[F*(*)£n>yW+(  Vy'S,£a,x<*'*) 


(4.61) 


9«laC  arguments  similar  to  thoaa  loading  to  aquation  (4.56)  It  can 
too  shown  that 


f*2 


•at 


<  3t 


rel 


|F#(»>|di 


(4.62) 


provided  accurate  aatlaataa  of  tha  lntagral  tarma  in  (4.59)  and 
(4.60)  ara  applied  at  aaeh  stags.  Sines  this  is  not  tha  cams  (4.62) 
can  only  ba  intaprsted  as  an  Indication  of  tha  error  magnitude. 

In  faet  tha  total  algorithm  has  prowad  to  ba  aufilelantly  conservative 
that  tha  is  no  need  to  divide  tha  required  relative  error  toy 
tha  number  of  levels  of  integration.  Tha  same  error  criterion  la 
applied  regardless  of  the  number  of  integration  levels  involved. 


/?/ 


4.  1.4.  Imnleao station  (multiple  lategratloa) 

Multiple  integrations  are  handled  fey  the  aet  of  adaptive 
Integration  sab  pro grans,  AflAPTO,  ADAPT 1  and  ADAPT2  which  have 
been  designed  to  fee  nested  (e. g.  equations  (4^39)  to  (4.41) 
in  that  order  with  ADAPT2  innermost.  ADAPTO  and  ADAPT 1  are 
similar  to  ADAPT2  which  was  described  in  Section  4.1.2*  especially 
with  respect  to  the  evaluation  of  the  Integration  at  the  level 
the  sub  program  is  controlling.  The  two  outer  sub  programs  contain 
additional  code  which  provides  estimates  used  in  the  application 
of  equations  (4.39)  and  (4.60)  in  ADAPT 1  and  ADAPT2  respectively 
and  which  performs  the  integrations  necessary  to  make  the  error 
estimate  defined  fey  equation  (4.61). 

The  cods  has  been  written  in  such  a  way  that  any  of  the 
Integration  sub  programs  can  be  omitted  from  the  sequence,  the 
only  requirement  being  adherence  to  the  order  of  nesting. 

The  sequence  of  operations  to  perform  a  multiple  integration 
is  illustrated  schematically  in  Figure  4.6  which  shows  the  flow 
of  control  between  the  three  adaptive  integration  function  sub 
programs  and  three  Integrand  functions  FO,  FI  and  F2.  The  diagram 
has  been  drawn  according  to  the  scheme  defined  in  detail 
la  Section  9.5.1.  The  essential  elements  of  this  soheme  as 
they  pertain  to  Figure  kJo  ,  which  is  a  simplification  of  similar 
Figures  appearing  in  Chapter  5.  are  defined  below. 

(1)  Logie  flow  can  be  either  forward  (top  to  bottom)  or 
reverse  (bottom  to  top). 


/fa 


Figure  4,6.  Schematic  representation  of  the  sequence  of 

operations  required  to  perform  a  triple  integration. 
Refer  to  text  for  interpretation. 


(li)  Initial  entry  and  final  exit  from  the  logic  la  at  the 
top  of  the  diagram. 


(Ill)  Small  boxes  indicate  evaluation  of  the  tern  within 
the  box*  only  when  the  logic  flow  through  the  box 
la  forward. 

(lv)  On  completion  of  the  evaluation  in  the  loweraost  box  the 
logic  flow  direction  is  reversed. 

(v)  Large  boxes  Indicate  the  adaptive  Integration  sub 

programs  which  can  direct  logic  flow  in  both  directions. 
Integration  Halts  are  enclosed  In  early  brackets  and 
are  assumed  to  be  evaluated  each  time  the  box  Is  entered 
from  above. 

(lv)  Round  boxes  indicate  control  points  associated  with  the 
evaluation  of  the  integrand  functions.  The  control  points 
have  memory  In  that  reverse  flow  is  directed  along  the 
same  path  as  the  control  point  was  entered  during  the 
previous  forward  flow.  Ths  two  way  arrows  between  the 
control  points  and  the  adaptive  integration  sub 
programs  Immediately  above  them  indicate  that  the 
control  points  are  themselves  undsr  the  control  of 
that  particular  adaptive  integration  algorithm. 

The  broken  lines  and  boxes  (which  are  not  part  of  the  scheme 
used  in  Chapter  5)  Indicate  the  calculation  of  the  Integral 
estimates  used  for  the  application  of  equations  (4*59)  and  (4. 60). 


/'?* 


The  estimates  of  the  integral  teras  in  (4.59)  and  (4.60)  ara 
atorad  la  TESTIO  aad  TESTI1  la  tha  common  block  TESTIN  respectively. 

The  accumulation  of  tha  arror  aatlaataa  la  controlled  by 

tha  anbroatlaa  IltFINT  aad  aaaoolatad  entry  points  IHFST, 

INFLS1 1  INFLS2  aad  I  IQ’S  UP.  For  a  si  van  overall  integration, 

IHFST  la  eallad  by  tha  outermost  iatagratloa  control  routine. 

This  action  aata  tha  arror  aatlaataa  and  tha  function  evaluation 

count  ara  to  zero.  During  tha  Iatagratloa,  ADAPT  1  aad  ADAPT2 

call  ZHFLX1  aad  XKVLK2  raapaotlvaly,  at  tha  coapletlon  of 

each  Iatagratloa  at  tha  tha  level  eoatrollad  by  tha  particular 

adaptive  routine.  IHTLE2  lneraaaats  tha  count  of  function  evaluations 

aada  by  ADAPT2  and  evaluates  tha  tar*  F  (y, a) .  £  (y,z)  which 

y  u,z 

Is,  In  turn,  fad  back  via  ADAPT2  to  the  outer  Integration 
routines.  IHFLX1  lneraaaats  the  count  of  function  evaluations 
aada  by  ADAPT  1  aad  coaputas  tha  tern  In  curly  brackets  in  aquation 
(4.61)  by  accessing  information  stored  In  tha  eoaaon  blocks 
INF0R1  and  IHF0H2. 

On  coapletlon  of  tha  outaraost  integration,  XKFIHT  Is 
eallad  to  ooaplata  tha  evaluation  of  aquation  (4*61)  and  to 
construct  an  appropriate  inforaatlve  sassage  regarding  the  performance 
of  the  Integration  algorltha.  Tha  total  error  estimate  is  displayed 
together  with  that  arising  only  froa  tha  integration  of  tha 
error  estimates  mads  by  tha  lamer  Iatagratloa  algorithms,  Tha  number 
function  (or  Integrand)  evaluations  made  at  each  level  ara  also 
displayed. 

Further  details  of  these  sassages  ara  given  in  tha  sub  program 


descriptions  which  follow, 


FUNCTION  ADAPTO(F,XMIN1,IMAX1,XP1,NP1,FINTa,  VARNAM) 


Fttnetlon 

ADAPTO  return*,  as  the  Tala*  of  the  function,  the  Integral 
I(a,b)  =  ^  f(x)dx. 

The  function  ADAPTO  la  configured  to  operate  an  the  outeraoet  of 
a  nested  nultlple  Integration  sequence. 

Parameter  list 

F:  Function  defining  the  Integrand,  f(x). 

ZMINIt  Lover  Unit  of  integration,  a. 

XMAXIi  Upper  Unit  of  Integration,  b. 

XP1 :  Array  containing  posalble  boundary  Talnes  of  x  for 
Initial  subdivisions. 

NP1  j  Amber  of  values  la  ZP1.  If  HP1  is  greater  than  2  the 
values  in  XP1  nust  encoapass  2NIN1  and  ZMAX1.  If  NP1  is 
less  than  5,  ADAPTO  sets  up  five  equally  spaced  nodes  for 
the  Initial  subdivision. 

FINTOi  Five  character  string  Identifying  the  Integrand. 

VABMAM:  live  character  string  identifying  the  Integration 
variable. 

Control  Parameters  Stored  In  Comon 

The  following  variables  exercise  control  over  the  adaptive 
integration  slgorlthn  la  ADAPTO. 

NVKAXi  (la  INFOBO)  Sets  the  aaxlaun  nasber  of  integrand  evaluations 


'ft 


to  to  UMd  la  any  single  integration  atop, 

M1XLEV:  (in  INTO HO)  Seta  the  aaxlaua  level  of  subdivision 
(i.e.  aaz  level  of  r)  naed  by  the  adaptive  Simpson 
algorithm. 

Operation 

JLDAPTO  operates  in  the  saae  way  as  A1MPS2  in:  so  far  as  the 
evaluation  of  the  integral  is  concerned.  Reference  to  the  do  assentation 
for  AD1PT2  in  flection  4*1.2  should  be  Bade  for  details  of  the 
integration  aethod  and  implementation.  The  variables  used  for 
the  integration  are  defined  la  Sable  4.  1  with  the  only  difference 
being  that  those  variables  listed  In  that  Sable  as  being  located 
in  eosaon  block  IKF0R2  are  located,  instead,  in  coaaon  block 
IKTOBO. 


She  essential  difference  between  1DJJPTO  and  JJQAPS2  is  that 
1DAPTB  integrates  the  error  estiaate  provided  by  the  Integrand  function* 
She  function  f  is  assnaed  to  have  two  arguaents,  the  first  is  the 
value  of  Z  for  which  the  Integrand  function  is  required.  She 
second  is  ths  error  estiaate  returned  by  the  integrand  function. 

1DAPT0  Integrates  ths  error  using  the  sane  aethod  and  the 
Intervals  that  are  used  for  the  integration  of  f(x).  She  Mbdi vision 
logic  is  not  affected  by  the  error  Integration  which  is  not 
extrapolated  by  the  fllapson  algor! tha.  She  cods  parallels  that 
used  for  the  aala  lntegratloa  and  uses  ths  variables  deflnsd  la 
Sable  4.2. 
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Variables  associated  with  error  integration, 
used  in  ADAPTO  aad  ADAPT  1  and  not  listed  in  Table  4..  1. 


Haas 

Location 

Significance 

XBB(K'J) 

Local 

Values  of  the  integrand  error 
at  J'th  level  (4  values). 
Corresponds  to  T(K,J). 

BHBHIG(J) 

Local 

Error  at  high  end  of  J'th  level. 
Corresponds  to  XHiaa(J). 

SRHLOW(J) 

Local 

Error  at  low  end  of  J'th  level 
interval.  Corresponds  to  ILOW(J). 

EBBM(I) 

Local 

Error  at 

BEBM1IXJ) 

Local 

Error  at  the  siddle  of  the  J'th 

level  interval.  Corresponds  to 

nWCTIOll  ADAPT  1  ,  XMAX1 , XP1 , NP1  ,/IJfTQ,  VABHAM,rCTS,gHHOR) 


ynPe^9fl 

ADAPT  1  returns,  as  the  tiIm  of  the  function,  the  Integral 

I(a,b)  a  I  f(x)dx. 

J  a 

Tho  function  ADAPT 1  la  configured  to  operate  aa  the  alddle 
integration  of  a  nested  multiple  Integration  sequence. 

Aa  for  ADAPT2. 

.  Eflng.tt.arf .  Styled  &  J<WWoj 

ITSHAX  and  MAZLKY  hare  the  sane  oontrol  a a  specified  for  ADAPT2,  hat 
are  stored  In  the  eoaaon  block  IHP0R1. 

SStm&laa 

ADAPT 1  operates  in  the  ease  way  as  ADAPT2  and  performs  the 
error  integration  described  for  ADAPTO.  The  only  additional 
operation  over  those  Bade  by  ADAPTO  la  the  application  of  equation 
(4.99)  to  compute  an  absolute  error  criterion. 

Rote  that  ADAP^2  sets  an  absolute  error  criterion,  wia 
equation  (4*60).  ADAPTO,  although  accommodating  an  absolute  error 
criterion  within  the  code,  operates  with  a  aero  (l.e.  aoa-operatlwe ) 
absolute  error  criterion* 


m 

SUBROUTINE  INEINT (ERREQ, NOADPT , ANS ) 
Function 


Subroutine  INFINT  constructs  a  message  which  indicates  the 
error  estimates  and  workloads  associated  with  a  given 
integration*  The  information  is  provided  at  the  completion  of 
the  outermost  of  a  nested  integration  sequence. 

Parameter  List 

ERREQ:  Relative  error  criterion  used  by  the  adaptive 
integration  algorithm. 

NOADPT:  The  number  of  the  adaptive  integration  routine 
calling  INFINT.  (e.g.  NOADPT  ■  1  corresponds  to 

ADAPT  1.  ) 

ANS:  The  estimate  of  the  integration  as  calculated  by  the 
adaptive  integration  algorithm. 

Operation 


The  operation  of  INFINT  depends  on  the  number  of  the 
adaptive  Integration  routine  for  which  the  information  is 
being  output.  However,  in  all  cases  the  main  function  is  to 
assemble  the  information  from  the  relevant  COMMON  block  and  to 
make  elementry  checks  on  the  error  estimates,  producing  an 
appropriate  warning  if  suspicious  integrations  are  detected. 

(i)  ADAPT  2 

The  sin^lest  case  is  when  INFINT  is  called  by  ADAPT  2 . 
The  integration  is  not  nested  and  all  the  relevant 
information  is  stored  in  the  COMMON  block  INF0R2.  The 
error  estimate,  ERRES2  is  converted  to  a  relative  error 
if  ANS  is  non-zero.  The  informative  message  has  the 
form. 


ANS 


****  ERR1  ■  **** 


NVALS 


**** 


Zoo 

where  ANS,  ERR  1  and  NVALS  are  the  numerical  value  of  the 
integration,  the  relative  error  estimate  and  the  number 
of  integrand  evaluations  used  respectively* 

(ii)  ADAPT  1 

If  INFINT  is  called  by  ADAPT  1,  then  there  may  be  an 
inner  integration  involving  ADAPT2.  The  total  error 
estimate  consists  of  ERRES1  (in  INF0R1)  produced  by  the 
adaptive  algorithm  and  ERRIN1  which  is  the  total 
integration  of  the  error  estimates  produced  by  ADAPT2. 
This  total  error  estimate  is  computed  by  INFINT, 
converted  to  a  relative  error  estimate  and  then 
included  together  with  ERRIN1  in  a  message  which  has  the  form. 


' ANS  -  ***  ERR  1  -  ***  ERR 2  -  ***  NVALS  -  ***,  ***' 

where  EKR1  is  the  total  error  estimate,  2RR2  the  estimate  for  the 
integration  of  the  inner  levels  and  the  two  numbers  associated  with 
NVALS  indicate  the  number  of  integrand  evaluations  associated  with 
ADAPT1  and  the  combination  of  ADAPT 1  and  ADAPT2  respectively. 


(iii)  ADAPT 0 

If  ADAPTO  calls  INFINT,  the  operations  resemble 
those  for  ADAPT  1  with  the  exception  that  the  error 
estimates  are  provided  by  ERRESO  and  ERRINO  in  INFORO. 
The  resulting  Information  message  is  similar  to  that 
given  above  but  with  the  addition  of  a  third  number 
after  NVALS  to  indicate  the  number  of  evaluations 
associated  with  ADAPTO,  ADAPT  1  and  ADAPT2. 

Note  that  the  initialisation  sequence  executed  by 
INFST  ensures  that  if  any  level  of  integration  is 
omitted,  the  relevant  terms  contributing  to  total 
estimates  are  zero. 


SUBROUTINE  INFLE I (  FACTOR , ERROR ) 


Function 

INFLE I  produces  an  error  estimate  associated  with  an 
integration  by  ADAPT  1.  The  subroutine  is  called  by  ADAPT  I 
only. 

Parameter  List 

FACTOR:  Term  by  which  the  error  estimate  is  to  factored  to 
produce  the  correct  total  estimate  by  the  calling 
code.  (See  equation  (  k :■&/•  ). 

ERROR:  Error  estimate  returned  by  1NFLE1. 

Operation 

Following  equation  (  U-(ol )  the  error  estimate  is  computed 
from  ERRIN1  and  ERRESI  the  integration  error  estimate  and  the 
integrated  error  from  inner  levels  of  integration 
respectively. 

INFLE 1  also  increments  NV1,  the  total  number  of  function 
evaluations  associated  with  ADAPT1. 


SUBROUTINE  INFLE 2 ( FACTOR , ERROR ) 


Function 

INFLE2  computes  the  error  estimate  for  an  integration 
involving  ADAPT2.  The  subroutine  is  called  by  ADAPT2  only. 

Parameter  List 

FACTOR:  Term  by  which  the  error  estimate  is  to  be  factored  to 
produce  the  correct  contribution  to  the  total  error 
estimate  for  integrations  using  ADAPT2.  (See  equation 
(  4-6/  ))  . 

ERROR:  Error  estimate  produced  by  INFLE2. 

Operation 

ADAPT  2  is  always  the  Innermost  intgeratlon  and  the  error 
estimate  comrlses  only  that  associated  with  Che  adaptive 
integration.  This  estimate  is  stored  in  ERRES2. 

INFLE2  also  accumulates  the  counter  NV2  which  indicates  the 
total  number  of  functions  evaluations  made  by  ADAPT2. 


SUBROUTINE  INF ST (NOADPT , FINTG , VARNAM, XMIN , XMAX) 
Function 


Subroutine  INFST  initialises  a  multiple  integration  process 
by  setting  to  zero  all  error  estimate  terms  and  function 
evaluation  counters.  The  subroutine  also  constructs  a  prompt 
which  identifies  the  integration  being  initialised. 

Parameter  List 


NOADPT:  The  number  of  the  integration  algorithm  calling  INFST. 

FINTG:  5  character  test  string  identifying  the  integrand  for 
the  outermost  Integration. 


VARNAM:  5  character  text  string  identifying  the  integration 
variable  for  the  outermost  Integration. 

XMIN:  lower  limit  of  integration. 

XMAX:  Upper  limit  of  integration. 

Operation 


The  error  estimate  variables  (ERRIN1,  ERRINO,  ERRESO, 
ERRES 1  and  ERRES2),  the  function  evaluation  counters  (NV1, 
NV2 ,  NVAESO,  NVALS  1  and  NVALS'2)  and  the  test  factors  (TESTIO 
and  TESTI1)  are  all  set  to  zero. 


If  Integration  Information  suppression  is  selected  no 
further  action  is  taken.  Otherwise  a  prompt  of  the  form 

'ADAPT*  USING  ****  FOR  ****  FROM  ****  to  ****' 


is  constructed  using  the  information  in  NOADPT,  FINTG,  VARNAM 
XMIN  and  XMAX. 


SUBROUTINE  INFSUP (LOG) 


Function 

Subroutine  INFSUP  provides  the  facility  for  optional 
suppression  of  integration  information  prompts.  Error 
messages  can  not  be  suppressed. 

Parameter  List 


LOG:  Logical  switch.  If  true  all  future  Information 
prompts  will  be  suppresed.  If  false,  all  future 
information  messages  will  not  be  suppressed. 


Operation 


INFSUP  transfers  the  value  of  LOG  to  OUTSUP  which  is 
accessed  by  INFST  and  INFINT  to  determine  whether  to  construct 
information  prompts  or  not. 


&r 


4.1.?  Performance 

The  error  analysis  presents d  in  Section  4.  1.2  and  the  arguments 
in  Section  4.1.3  permit  the  set  of  appropriate  convergence  criteria 
with  the  adaptive  integration  algorithm.  The  analyses  are 
not  complete  enough  to  provide  accurate  estimates  of  the  errors 
associated  with  a  given  integration,  it  best  an  order  of  magnitude 
for  the  upper  bound  for  the  error  can  be  established. 

Accordingly,  the  integration  procedure  can  be  assessed  only 
by  appropriate  testa  using  known  integrations  for  which  the 
answer  can  be  calculated  via  an  alternative  method.  There 
are  many  examples  in  the  literature  (e.g.  LyneeaV'  Robinson^  ) 
which  demonstrate  the  suitability  of  adaptive  integration  methods 
for  application  for  the  evaluation  of  single  integrals.  Zn 
particular,  the  adaptive  procedures  are  effective  for  dealing 
with  improper  integrals  where  the  integrand  has  one  or  more 
singularities  within  the  domain  of  integration. 

In  the  present  application,  the  Integrands  are  not  expected 
to  be  singular}  the  sain  concern  is  achieving  adequate  computational 
efficiency  so  that  the  cost  of  evaluating  a  multiple  integration 
is  not  prohibitive. 

The  performance  of  the  multiple  algorithm  is  indicated  by 
the  resmlts  in  Tables  4.3  to  4.6.  The  data  la  each  table  were 
obtained  by  evaluating  a  given  integral  several  times  using  different 
values  of  In  each  ease  it  was  possible  to  integrate  analytically 

so  that  the  actual  error  could  be  evaluated.  The  ratio  of  the  . 


estimated  error  to  the  actual  error  la  a  measure  of  the  performance 
of  the  subdivision  logic  with  respect  to  satisfying  the  required 
error  bounds.  This  ratio  nust  be  greater  than  1  and  Ideally  as 
close  to  1  as  possible.  High  raises  indicate  excessive  conservatism. 

The  numbers  HX,  HT  and  HZ  indicate  the  approximate  numbers 
of  Integrand  evaluations  for  each  integration  over  the  appropriate 
variable.  HTOT  indicates  the  total  nunber  of  evaluations  of  the 
lnnemost  Integrand  and,  assuming  an  equal  proportion  for  each 
Integrand,  is  a  measure  of  the  total  workload  for  the  evaluation 
of  the  Integral. 

The  first  integration  (Table  4*3)  Is  typical  of  a  peaked 
Integrand  with  a  discontinuity  in  one  direction.  The  integration 
Halts  were  calculated  by  the  range  Halting  algorithm  described 
In  Section  4.4*1  before  the  Integrand  was  truncated  at  10. 

Ho  initial  subdivision  sodas  were  specified  so  that  4  intervals 
were  used  for  the  trapezoidal  Integration.  11  though  x  =  10  was 
a  nods  for  the  initial  subdivision,  the  integration  procedure 
had  to  find  out  for  Itself  that  px(x)»  0  over  the  whole  of 
the  interval  (x^tX^  r  1°)*  *bi*  1*  reflected  by  the  relatively 

large  nuabesof  function  evaluations  associated  with  the  Integrations 
in  the  x  direction. 

Hote,  however,  that  reliable  results  were  obtained  with  the 
algorltha  being  sore  conservative  at  the  higher  levels  of  accuracy. 
This  is  probably  eaaaed  by  some  interaction  of  numerical  roundoff 
with  the  subdivision  logic.  Ixperieaee  with  the  algorltha  has 


led  to  a  general  Vole  of  thumb*  that  roundoff  will  affect  the 
subdivision  logic  If  the  product  of  the  number  of  Innermost 
Integrand  evaluations  and  the  reciprocal  of  the  relative  error 
requirement  exceeds  10*  where  n  Is  the  number  of  significant 
figures  retained  by  the  computer.  Using  this  rule,  the  0.0001 
results  can  be  expected  to  affected  In  this  way. 

If  the  same  calculation  Is  made  with  Xg  =  10  (Table  4.4)  so  that  the 
effect  of  the  discontinuity  is  moved  to  the  integration,  limit,  the 

workload  Is  reduced  by  nearly  an  order  of  magnitude,  with  the 
greatest  Improvement  being  at  the  lowest  levels  of  accuracy. 

Note  that  the  0.0001  result  Is  not  nearly  as  conservative  as 
the  corresponding  result  lm  Table  4.3. 

This  time,  some  of  the  lower  accuracy  results  are  conservative. 
This  reflects  the  step  changes  la  accuracy  made  by  decisions 
to  subdivide  given  Intervals.  Such  changes  can  result  in 
integrations  Involving  few  function  evaluations  being  excessively 
conservative. 

The  results  la  Table  4.5.  indicate  adequate  performances 
for  an  integration  which  involves  further  integrand  functions  that 
are  typical  of  thosed  used  to  represent  the  density  functions  used 
In  reliability  models  for  fatigue. 

Am  Integration  involving  variable  integration  limits 
is  given  la  Table  4.6.  Note  that  the  Innermost  integration  is 
trivial  and  the  algorithm  has  reacted  accordingly.  Again  note 
the  extreme  conservatism  at  low  levels  of  accuracy*  the  minimum 


Buabar  of  late  grand  evaluations  programmed  Into  the  subdlvsion 
logic  Is  nor*  than  adaqnata  for  tho  0, 1  Integration. 

Bio  results  tabulated  here  are  typical  of  those  that 
hare  been  obtained  for  a  elds  range  of  Integrations,  they  are 
not  conclusive  evidence  of  accuracy;  such  teats  never  can  be. 
they  do  however  Indicate  that  the  sal ti pie  Integration  algorltha 
algorithm  can  work  aost  effectively  for  ^rel  in  the  range  0.01 
to  0.0001  on  an  eight  figure  computer,  this  Is  more  than  adequate 
for  the  requlrmMUi  of  reliability  functions  based  on  input  data 
exhibiting  much  greater  sources  of  error. 

For  these  levels  of  accuracy  approximately  25-30  Integrand 
evaluations  can  be  expected  for  each  Integration  over  one  of  the 
variables  of  Integration.  Numbers  around  100  indicate  a  discontinuity 
In  the  Integrand  which  should  be  removed  by  redefining  the  limits 
of  Integration.  (This  accounts  for  the  attention  given  to 
integration  Halts  In  the  reliability  modelling. )  Larger  numbers 
of  Integrand  evaluations  Indicate,  either  several  discontinuities 
In  the  Integrand  function,  or  some  other  problem  which  causes 
an  excessive  demand  for  interval  subdivision. 


£rel 

Answer 

returned 

t.et 

Crel.) 

Leet/£act 

n 

HI 

NX 

BTOT 

.1 

.5017 

.00313 

0.92 

21 

19 

87 

35583 

.01 

.50133 

.00301 

1.13 

21 

21 

103 

45423 

.001 

.5000048 

.000093 

9.6 

33 

27 

115 

101315 

.0001 

.5000037 

.000092 

12.4 

33 

28 

143 

132847 

Table  4.3.  Performance  etatiatica  for, 

I-  I  pU)pJy)pU)  dxdydx 

JVV*1 

for  p(x)  =ji.exp  and  p(y)  and  pCx)  aimilarly  defined. 

<r*0.  1.  x1«y1-*1  *-9*371  and  z2n  y2«.  Xg.s  10.631  (Unite 
calculated  by  HANOI,  Section  4.4.1).  p(x)  =  0  tor  x  >10. 

Maximum  aubdlvlelon  level  20. 


£re 1 

Answer 

returned 

^eat 

Irel. ) 

t  ./£  , 

eat'  act 

HZ 

HI 

NX 

BTOT 

.1 

.5017 

.0405 

15.5 

21 

19 

9 

368n 

.01 

.50145 

.0037 

1.05 

21 

21 

13 

5733 

.001 

.5000045 

.000105 

11.6 

33 

27 

19 

16739 

.0001 

.500016 

.0000865 

2.7 

33 

28 

27 

25083 

Table  4.4.  Performance  etatletlce  for  Integration  defined 
for  table  4.3  bat  wltb  x2  =.  io. 


^rel 

Answer 

returned 

fgm 

Wlat 

B 

HI 

B 

.1 

8.1527 

.0553 

2.89 

15 

15 

15 

3375 

•01 

8.00273 

.0011 

3.2 

25 

23 

*3 

14325 

.001 

8.000755 

•000823 

8.72 

29 

28 

29 

23229 

.0001 

8.000024 

.0000171 

5.7 

59 

50 

59 

174483 

Table  4.5.  Perforaanee  atatlatl os  for  the  Integration, 


I  = 

r°° 

t 

[a.*  )3  j  *  8 

Jo  J0 

for  am 2. 

"x  dxdydz 

€ 

rel 

Answer 

returned 

(rel.) 

Sat/Swt 

HZ 

HI 

HZ 

.1 

192.754 2 

.0784 

31 

9 

8 

9 

.01 

192. 1887 

.00282 

6.33 

25 

14 

9 

.001 

192.2677 

.000068 

1.98 

33 

19. 

9 

.0001 

192.2740 

.000039 

*4.9 

33 

25 

9 

.00001 

192.2743 

.000004 

65 

33 

9 

NTOT 


549 

2907 

5283 

7155 

18693 


Table  4.6.  Performance  etatletlce  for  tbe  Integration, 
-TL  .  i.  — 2__2\i 


r|  r  2a.  co*ef(4u-rr 

xil.  ).  ' 


dsdrde 


«.  64n5(1T  -26/15V13;  =  192.2743  Tor  a  a  2. 


4.2.  Interpo lation 


In 


One  of  the  significant  features  of  the  NERF  computer  program 
is  that  input  functions  can  be  defined  as  sets  of  ordered  pairs 
of  argument  and  function  values.  This  removes  a  requirement 
for  the  user  to  fit  specific  functional  forms  to  the  input  data 
and  removes  any  dependency  on  such  forms  from  the  NERF  code. 

The  generation  of  continuous  functions  from  these  sequences 
of  ordered  pairs  requires  an  appropriate  interpolation 
procedure.  For  several  years  during  the  development  of  NERF, 
piecewise  polynomial  interpolation  was  used.  As  the 
integration  methods  were  refined  and  the  graphical  methods  for 
the  display  of  the  adaptive  integration  process  developed,  it 
became  evident  that  discontinuities  in  the  derivatives  of  the 
interpolated  functions  were  causing  an  interference  with  the 
adaptive  integration  logic  resulting  in  excessive  numbers  of 
function  evaluations  in  some  cases.  Although  this  problem 
could,  to  a  large  extent,  be  overcome  by  locking  the  adaptive 
integration  logic  to  the  nodes  used  to  define  the  input 
functions,  the  use  of  splines  which  ensure  continuity  of  at 
least  some  of  the  derivatives  proved  beneficial. 

Although  the  algorithm  used  to  fit  piecewise-  polynomials  to 
the  ordered  pairs  could  cope  with  polynomials  of  any  order, 
experience  showed  that  polynomials  of  order  3  and  5  produced 
the  most  satisfactory  results  especially  when  the  interpolated 
function  was  Inspected  graphically.  Accordingly,  cubic 
splines  were  adopted  as  a  replacement  for  the  piecewise 
polynomial  interpolation  procedure. 


( 


in 

4.2.1.  Mathematical  Basis 

The  theoretical  basis  for  spline  Interpolation  Is  well 
known  and  documented  by  most  good  texts  on  numerical  analysis 
(e.g.  Ahlberg  et  al  ref. 21).  A  cubic  spline  is  the  simplest  spline 
Interpolation  function  and  has  a  physical  analogue  in  the 
draftsman's  spline  (from  which  the  name  originated)  which 
consists  of  thin  strips  of  wood,  or  similar  material,  used  to 
fit  smooth  curves  through  points  on  a  diagram  by  attaching  lead 
weights  at  points  along  the  strip  and  allowing  the  elasticity 
of  the  wood  and  the  effect  of  gravity  to  generated  the  required 
distribution  of  curvature. 

Given  a  sequence  (x^>  of  M  argument  values  for  the  function 
f(x)  the  cubic  spline  through  the  points  (x^.fCx^)}  is 
identical  to  the  curve  that  the  draftsman  would  obtain  if  the 
points  at  which  the  lead  weights  were  attached  coincide  with 
the  points  {x^ftx^)}.  The  cubic  spline  has  continuous  first 
and  second  derivatives  and  of  all  the  functions  having  a 
continuous  second  derivative  over  the  interval  [x^.x^]  the 
cubic  spline  minimises  the  integral, 

(** 

f"  (x)  2dx . 

and  therefore  has  minimum  curvature.  (4.63) 

The  cubic  spline  consists  of  a  sequence  of  3rd  order 
polynomials,  one  for  each  of  the  intervals  (x^,xi+1l  for 
M-l .  Denoting  the  cubic  spline  by  y(x),  the  following  notation 
may  be  defined. 


s(x) 

■  dy/dx 

(4.64) 

m(x) 

-  d2y/dx2 

(4.65) 

yi  “ 

y(x1> 

(4.66) 

8i  * 

s(  xt) 

(4.67) 

A 


m1  -  m(x^) 


(4.68) 


The  equation  defining  the  spline  over  is 

generated  by  assuming  that  the  second  derivative  varies 
linearly  over  the  the  interval,  i.e., 


where 


m(x)  -  mt  +  (mi+1-m1 ) (x-xt) /hif 


h i  ”  xi+l"xi* 


(4.69) 


(4.70) 


Integrating  equation  (4.69)  yields. 


s  (  x )  -  m  ^  ( x-  x  ^  )  +  (m^^-m^  )  (x-x1 )  /  (  21^)  +  At  (4.71) 


y ( x)  -  m1(x-x1)2  +  (m1+1-«1 ) (x-x±) 3/(6h±) 
+  A1(x-x1)  +  Bt, 


(4.72) 


where  Aj^  and  B1  are  constants  of  Integration  which  may  be 
evaluated  by  imposing  the  conditions  y(xt)*y^  end 
y * xi+l ^“7i+l »  90  chat  •ventually 

y(x)  •  +  (y1+1-yt) (x-x^  /ta  -  h  (2m  ) (x-x  ) H 

+  m1(x-x1)2/2  +  (m1+1-m1 )  (x-x^)  3 /6 ,  (4.73) 

and 

s ( x )  -  m1(x-xi)  +  (m1+1 -mt ) (x-xt) 2 /(2ht) 

+  (yl+i-yt>/hi  “  h1(2m1+m1+1)/6.  (4.74) 


The  second  derivatives  at  x«xi  and  x*xi+1 ,  and  «1+1 
respectively  are,  at  this  stage,  unspecified.  Equations  (4.73) 
and  (4.74)  are  applicalbe  for  any  cubic  passing  through  y^  and 
yi+^.  The  special  condition  leading  to  the  cubic  spline  is 
that  the  first  derivative  is  continuous.  Enforcement  of  this 
condition  leads  to  a  set  of  equations  that  can  be  solved  to 
yield  the  point  values  of  curvature,  <m^>.  From  (4.74) 


si  “  3(xt)  -  ^i+l"yi)/hi  "  h1(2m1+m1+1)/6 

■1+l  “  ■(*1+1)  “  (yi+l"yt)/hi  +  h1{ffli+2mi+l)/6- 
Equation  (4.76)  for  the  Interval  [x^  .xj  yields, 

•i  -  (yi-yi-l)/hi  +  hi-l(ni-l+2n,i)/6* 

Combining  equations  (4.75)  and  (4.77)  , 


(4.75) 

(4.76) 


(4.77) 


“i-lhi-l/(hi+hi-l)  +  2mi  +  *i+lhi/(hi+hi-D 

•  6t<y1+i-yi)/hi  ~  (yi“yi-i)/hi-i1/(hi+hi-i)’ 

...  (4.78) 

which  is  valid  for  i-2,M-l.  The  two  extra  equations  required 
to  completly  specifiy  (mt>  are  obtained  by  imposing  conditions 
on  the  slope  of  the  spline  at  each  end  of  the  interval  [x^,x^]. 
Considering  the  end,  x»x^,  a^d  denoting  the  imposed  slope  by 
y'^,  equation  (4.73  yields 


y'j  -  (y2-y|)/4j  -  h^Zmj+mg)/^ 

which  can  be  written  in  the  form 

2mj^  +  m2  ■  dj^ 

where 

d i  -  6  [(yj-Tj)/1*!  ”  y '  1 3  /T» i  * 
Similarly,  from  (4.7^  at  i“M, 

"m-1  +  2bM  "  dM’ 

dM  "  “6t(yM"yM-l)/hM  '  *V]/V 


(4.79) 


(4.80) 


(4.8l) 


(4.82) 


where 


(4.83) 


2/5" 

The  specification  for  y'^  and  y'M  is  arbitrary  and  may  be 
adjusted  to  meet  specific  requirements .  The  specification  in 
NERF  amounts  to  a  second  order  estimation  of  the  slope  using 
the  3  data  pairs  at  each  end  of  the  spline.  For  example,  at 
x-x^,  Taylor's  expansions  about  x-Xj  ,  yield 

< y 2 ~ y i )  ^ h i  “  y*  i  +  y  "ihi^2  +  °(hi2)  C 4.84) 

(y3-yi)(hi+h2)  ■  y' +  y"1(h1+h2)/2  +  o(  (h^hj)  /2  ) . 

(4.85) 

Elliminating  y ” ^  from  these  equations  yields, 

d  i  -  6  [  (y3-y  /(h^+hj)  -  (y2-y  phj]  /h2  •  (4.86) 

Similarly,  expansion  about  **^  leads  to 

dM  “  “6  C(yM_yM-2) /(xM"xM-2)  ”  ^M-l1  /hM-l 

(4.87) 

The  set  of  equations  (4.78),  (  4.8Q  and  (4.82)  can  be  solved  to 
yield  the  curvatures  {n^}  and  the  cubic  spline  is  completely 
dete  rmined . 


a* 

4.2.2.  Implementation 

Given  the  sequences  {x^}  and  (y^>,  the  construction  of  a 
cubic  spline  consists  of  solving  equations  (4.78),  (4.8Q  and 
(  )  for  .  These  solutions  are  obtained  during  an 

inltilisation  phase  and  stored,  together  with  the  first  order 
differences  , 

y®!  -  (y1+i-yi>/hi  (4.87) 

for  later  use  by  equations  ( 4.7D  or  (4.725  for  evaluation  of 
y(x)  or  s(x).  Slightly  more  efficient  forms  of  equations  (4.71) 
and  (  )  can  be  generated  by  rearrangement,  i.e., 


y  (x) 
s  (x) 


(x-xt)y 


(X-Xj^ 


)  (x-x 


i+1 


)(mi+mi+l 


+m ( x ) ) / 6 

(4.88) 


(2x-x1-x1+1 ) (m1+mt+1+m(x) ) 

+  (x-xt)(x-x  )(m1+1-m1)/(6h1), 

...  (4.89) 


where  m(x)  is  given  by  (4.69). 


The  main  task  during  initialisation  is  the  solution  of  the 
set  of  equations  defining  { m^ > .  These  equations  can  be  recast 
in  the  form. 


2m^  + 

(1**i)mi-l  +  2"i  +  ^“i+l  “  di 
+  2  “M  "  dM’ 

where 

-  h1/(h1+h1+1) 

dt  -  6(yDi-yDi.1)/(hi+h1+l), 

and 


(4.90) 

(4.91) 

(4.92) 

(4.93) 

(4.94) 


* 


(4.95) 
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(Al  and  Am  are  retained  as  separate  parameters  to  allow 
possible  modifications  to  the  code  to  cope  with  more  general 
boundary  conditions  as  described  by  (ref). 

The  set  of  equations  thus  form  a  'tridiagonal'  set  which  may 
be  solved  by  the  algorithm  usually  attributed  to  Thomas  (ref), 
the  form  appropriate  for  the  equations  here  being  described 
below. 

(i)  Set  b^  -  2,  a^  -  d^/2  and  c^-A^/b^.  (4.96) 

(ii)  For  i-2  to  i-M-1, 

bt  -  2  -  (1  -^1)c1.l,  (4.97) 

ci  "  ^i/bi*  (4.98) 

ai  "  Ui-a-^a^p/b,. 

(Ill)  s.t  bM  - 

..d  «M  -  vV.-i- 

(iv)  For  i  -  M-l  to  1-1, 

ai  *  ai  Ciai+1* 

Following  these  operations  the  values  {a^>  are  equal  to  the 
required  solutions  for  (m^). 

The  spline  interpolation  is  provided  by  the  function  FINTRP 
which  executes  the  tasks  of  initialisation  and  interpolation 
according  to  the  value  of  a  control  parameter  in  the  call.  The 
evaluation  of  the  derivative  function  is  provided  by  an  entry 
point  in  FIKTRP  called  DERIV. 


(4.99) 

(4.100) 

(4.101) 

(4.102) 


Given  a  function  defined  by  a  set  of  ordered  pairs  of 
function  and  argument  and  evaluated  by  an  interpolation 
procedure,  an  obvious  approach  for  generating  the  inverse 
function  (e.g.  x«x(y)  for  y(x))  is  to  use  direct  interpolation 
with  the  sequences  {x^>  and  { y  ^  >  interchanged.  Unfortunately, 
the  inverse  function  thus  generated  is  not  an  exact  reciprocal 
of  the  forward  interpolation.  In  other  words,  if  y*(x)  denotes 
the  interpolated  value  of  y(x)  using  {x^>  and  {y^},  and  x*(y) 
the  interpolated  value  of  x(y)  using  (y^  end  {x^},  then 

x1(y1)  f  x.  (4.103) 


This  non-reciprocality  (which  is  not  precisely  known)  can 
lead  to  hysteresis  if  repeated  evaluations  of  the  interpolated 
function  and  the  inverse  are  made.  Such  hysteresis  contributed 
to  problems  during  the  development  of  an  Interpolation 
procedure  for  the  loss  factor  where  the  evaluation  ofl^”^  is 
required  . 


An  alternative  approach  is  the  obtain  the  inverse  by  solving 


y  (x )  -  y  -  0 


(4.104) 


using  the  secant  method  described  in  Section  4.3.  By  succesive 
iterations,  the  error  in  (4.103)and  hence  the  non-reciprocality 


can  be  controlled  to  knovn  limits.  Any  sensitive  logic  can 
then  be  modified  to  cope. 
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FUNCTION  FINTRP (X , XAR , A, IMAX, ITYPE) 

Function 

FINTRP  evaluates  the  interpolating  function  for  the  set  of 
ordered  pairs  of  argument  and  function  values  stored  in  XAR  and 
A  respectively.  The  current  Implementation  uses  cubic  spline 
interpolation  . 

Parameter  List 

X:  Value  of  the  argument  for  which  the  interpolated 
function  is  required. 

XAR:  Array  containing  {x^},  the  values  of  argument  used  to 
define  the  function. 

A:  Array  containing  {y^,  the  function  values  used  to 
define  the  function.  Note  that  A  must  be  large  enough 
to  store  the  sequences  {y^^J  and  {m^}. 

IMAX:  Number  of  values  in  each  of  {Xj}  and  {yj}. 

ITYPE:  Control  parameter. 

■1,  or  «2,  The  interpolating  function  is  evaluated 
using  values  for  { y15  ^  >  and  that  are  assumed  to  be 

stored  in  A. 

■3,  The  spline  is  initialised  and  the  interpolated 
value  for  x“X  evaluated. 

is  lnitiailised  but  no  evaluation  of  the 
function  is  made. 

The  array  A  is  assumed  to  be  sufficiently  large  to  store 
<74)*  ^7Dt>  »nd  for  i  -  1  to  IMAX.  During  initialisation, 

the  first  order  differences  are  computed  via  equation  (A'f7)  and 
the  curvature  values  are  computed  using  the  algorithm 
described  in  Section  4.4.2.  The  code  is  a  direct  application 


•4,  The  spline 
interpolating 


Operation 


of  this  algorithm  with  the  following  equivalences  between 
mathematical  symbols  and  variable  names  applicable. 


ALO  - 
ALM  -  *M. 

00  -  dr 
DM  -  dM, 

B ( 1 )  -  bt, 

C  (I  )  ■  C^  , 

A ( I  +2  *XMAX )  -  at  -  n^, 
HI  -  hlf 
HIM  -  hi_l , 


HT  - 


hi  + 


i+1 


The  evaluation  of  the  spline  function  at  x»X  follows  the 
same  logic  as  that  for  evaluating  the  derivative.  DERIV  is,  in 
fact,  an  entry  point  which  sets  ITYPE  ■  5.  The  following 
operations  complete  the  evaluation  of  the  interpolating 
function,  or  the  derivative  according  to  the  value  of  ITYPE. 

(i)  INDLOW  is  called  to  to  find  the  interval  containing  X. 
(i-IX).  » 

(ii)  If  X  is  outside  txi»xxMAX^  a  warning  prompt  is  issued. 

(ill)  If  X  is  close  to  one  of  the  values  of  {x^},  the 
corresponding  value  of  {y4>  1*  returned  rather  than 
perform  a  full  Interpolation.  Note  that  EPS  1  is  sec  to 
a  number  corresponding  to  machine  precision.  If  the 


derivative  is  required,  equations  (/£•'  7f)  or  C40 1)  are 
used  to  return  a  nodal  value. 

(iv)  Equations  or  ( 4'#?)  are  evaluated  for  the 

interpolating  function  or  the  derivative  respectively. 
Note  the  following  equivalences  between  the 
mathematical  notation  and  the  program  varaible  names. 

B IT X  -  x-x1, 

RMI  -  mi, 

RMIP1  -  a1+1, 

SM  -  ^mi  +  i“mt^hi* 

RM  ■  m( x)  . 


Prompts 

t 

(i)  'CAUTION  EXTRAPOLATION  X  -  *****'•  The  value  of  x  is 
outside  the  interval  [x^.x^]  and  the  interpolation  is 
probably  being  called  erroneously. 


FUNCTION  DERIV(X, XAR, A, IMAX) 


Function 

DERIV  evaluates  the  derivative  of  a  function  deflnied  by 
sequence  of  ordered  pairs. 

Parameter  List 

X:  Value  of  x  for  which  the  derivative  is  required. 
XAR:  Sequence  of  values  of  argument  defining  the  function. 
A:  Sequence  of  function  values  defining  the  function. 
IMAX:  Number  of  data  values  in  XAR  or  A. 

Operation 

DERI V  is  an  entry  point  in  FINRP  and  the  operatios  require 
for  the  evaluation  of  the  derivative  a  described  with  th 
documention  for  FINTRP . 


4.3.  Solution  of  Equations 


The  limit  risk  inspection  procedure  requires  the  solution 
of 

log  ( r  { t) )  -  l°8(ri±s,)  (4.105) 

for  t.  The  function  r(t)  is  given  by  the  appropriate 
expression  for  total  risk  and  although  defined  for  any  value  of 
t,  its  inverse  is  intractable  by  analytical  methods.  Numerical 
solution  of  (4.105)  is  necessitated.  The  secant  method  (ref 
22  )  is  suitably  efficient  and  easy  to  apply.  Moreover, 
calculation  of  the  derivative  of  log(r(t))  is  not  required. 

Although  the  calculation  of  inspection  times  using  the 
limit  risk  criterion  was  the  motivation  for  the  provision  of  an 
equation  solver  within  the  NERF  program,  the  secant  method  is 
also  used  to  provide  Inverse  interpolation  for  the  input 
functions  that  are  described  by  ordered  pairs  and  to  solve  the 
equations  associated  with  the  proof  load  inspection  boundary 
(Section  5.6.). 


4.3.1.  The  secant  method 


Consider  the  solution  of  the  equation 


f ( x)-0 . 

Given  two  initial  estimates  for  x,  x ^ 
function  values,  f(x^)  and  fCxj).  an 
inverse  linear  interpolation,  i.e., 


(4.106) 

and  Xj ,  and  corresponding 
estimate  can  be  found  by 


x3  “  X1  “  (x2  "  (*!> /(f (x2)  "  fCxj))  (4.107) 


as  shown  schematically  in  Figure  4.7  •  The  values  of  x2  and  x^ 

can  be  similarly  used  to  yield  a  new  estimate  for  the  solution 
of  equation  (4.106 ) t  lead ing  to  the  recurrence  relationship, 

xi+l  *  xi-l  *  (xl  “  xi-l) *f (xi_1>/(f(x1)  ”  f(xi-l))  (4.108) 
which  is  the  basis  of  the  secant  method.  Equation  (4.108)  can  be 

applied  repeatedly  until  a  suitable  convergence  criterion  has 

been  satisfied.  In  NERF,  the  criterion, 

jf(*)i  <  e  (4*109) 

is  used.  The  sequences  of  iterates  produced  by  equation  (  4.108) 
can  be  shown  (ref  22  )  to  have  good  rates  of  convergence. 


M 


4.3.2.  Implementati o  n 


The  solution  of  equation  (4.106)  is  controlled  by  the 
subroutine  FSOLVE  which  returns  the  solution  as  the  value  of 
the  function.  A  direct  copy,  FS0LV2,  permits  the  solution 
procedure  to  be  nested. 


The  implementation  pf  the  secant  method  in  NERF  has  the 
refinement  that,  following  each  application  of  equation  ^.10§  , 
it  is  not  necessarily  true  that  x^_j  is  the  estimate  that  is 
discarded.  Instead,  the  larger  of  and  x^^  is  discarded. 
This  refinement  allows  the  initial  estimates  to  be  defined  in 
any  order  and  can  improve  initial  rates  of  convergence. 


Typically,  adequate  convergence  (to  a  relative  error  of 
10  5  say)  can  be  achieved  in  less  that  10  iterations.  The  code 
in  FSOLVE  flags  an  iterative  sequence  lasting  more  than  20 
iterations  as  a  possible  error  condition. 
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FUNCTION  FSOLVE (F, ARG.GIN 1, GIN  2, F VI ,FV2, EPS ) 

FUNCTION  FSLOV2 (F, ARG.GIN1.GIN2.FV1 ,FV2, EPS ) 

Function 

FSOLVE,  and  its  direct  copy  FSOLV2  solves  the  equation 

F(x)  -  ARG  -  0 
using  the  secant  method. 

Parameter  List 

F:  Function  defining  F(x). 

ARG:  Value  of  F(x)  for  which  the  solution  is  required. 
GIN1:  First  estimate  of  x,  Xj. 

GIN2:  Second  estimate  of  x,  Xj* 

FV1 :  F ( x  L )  . 

FV2:  F(x2). 

EPS:  Absolute  convergence  criterion. 

Operation 


The  code  in  FSOLVE  is  a  direct  application  of  the 
Implementation  described  in  Section  4.3.2.  Note  that  the  added 
acceptance  criterion 

f(*1+l>  -  f(xt)  <  €. 

-3  2 

where  t  is  a  very  small  number  (e.g.  10  )  is  also  applied  to 

guard  against  the  effects  of  roundoff  errors. 

Error  Messages 

(i)  'CONVERGENCE  FAILURE  IN  FSOLVE':  More  than  20 
Iterations  have  been  used.  FSOLVE  returns  the  current 
estimate  to  the  calling  code. 


vtr 


4.4.  Mlscelaneoua  Support  Functions 

In  addition  to  the  three  basic  numerical  methods  of 
integration,  solution  of  equations  and  interpolation,  the 
sections  of  code  that  evaluate  the  reliability  functions 
depend  on  the  availibllity  of  subroutines  which  perform 
certain  support  functions.  These  subroutines  are  described  in 
this  Section. 


4.4.1.  Function  range  limiting 

Some  of  the  input  functions  accesses  by  NERF  are  defined  for 
infinite  ranges  of  the  argument.  It  is  Important,  in  so  far  as 
the  numerical  routines  are  concerned,  that  the  lniflnite  range 
be  converted  to  a  finite  range,  beyond  which  the  function  is 
sensibly  zero. 

This  conversion  is  provided  by  the  subroutine  RANGE  which, 
given  the  range  of  the  arguments  for  a  function,  computes  a  new 
range  if  possible  such  that  the  function  is  greater  than  a 
small  number  (currently  10  °)  over  the  whole  of  the  new  range. 
The  subroutine  also  finds  the  location  of  the  maximum  value  of 
the  function.  (This  additional  facility  is  not  used  by  the 
reliability  function  evaluation  code.) 


SUBROUTINE  RANGE (F, XLOW, XHIGH , XPEAK, IPEAK) 


Function 


Given  a  function,  F(x),  RANGE  finds  the  limits  for  the 
argument,  x,  beyond  which  F(x)  is  insignificantly  small,  RANGE 
also  locates  the  maximum  value  of  F(x). 

Parameter  List 

F:  Function  for  vhich  the  argument  limits  are  required, 

XLOW:  Specified  lower  limit  for  x  from  which  the  search  for 
the  'sensible'  limit  will  commence.  Returned  as  the 
located  sensible  limit, 

XHIGH:  Specified  upper  limit  for  x,  from  which  the  search  for 
the  sensible  limit  will  commence.  Returned  as  the 
sensible  limit, 

XPEAK:  Returned  as  the  argument  correposndlng  to  the  maximum 
value  of  F ( x ) , 

IPEAK:  Control  parameter, 

•0,  RANGE  does  not  locate  the  maximum  value  of  F(x), 
1*0,  RANGE  locates  the  maximum  value  of  F(x), 
Operation 

The  search  for  the  limits  and  function  maximum  uses  a 

conventional  interval  bisection  method.  The  sear'*'  ? 

controlled  by  three  parameters  which  are  given  values 

RANGE, EPS  specifies  the  minimum  value  of  the  function  us 

•8 

find  the  sensible  limits.  Currently  EPS  is  set  to  10  ,  ts _ _ 

and  NLIM  speclfiy  the  numbers  of  interval  subdivisions  used  to 
locate  the  limits  and  maximum  raspactlvaly ,  Currently,  NZERO  ■ 
10  and  NLIM  -  20. 


Prompts 


(i)  '**  WARNING  **  F(XHIGH)  -  ****':  The  value  of  F(x)  for 

the  upper  sensible  limit  is  greater  than  EPS.  This 
means  that  either  the  search  has  failed  or  that  the 

upper  limit  specified  during  the  call  vignetted  the 

function.  The  latter  case  may  be  legitimate. 

(ii)  '**  WARNING  **  F(XLOW)  -  ***':  The  value  of  F(x)  at  the 

lower  sensible  limit  is  greater  than  EPS.  See  (i) 

ab  ove . 


tot 


4.4.2.  Index  Location 

Given  a  monotonic  sequence,  {x^},  of  nodal  values  of  a 
variable,  x,  an  ordering  of  the  index  i  is  defined.  A 
requirement  of  many  of  the  numerical  procedures  used  by  NERF  is 
to  locate  a  given  value  of  x,  *val .  In  the  sequence. 

Defining  the  notion  that  the  direction  of  i  increasing  is 

movement  from  left  to  right  (as  would  be  the  case  if  the 

sequence  of  values  were  written  across  a  page)  ,  function  INDHI 

finds  the  highest  value  of  i  such  that  x^^  is  to  the  left  of 

x  ,  .  Function  INDLOW  finds  the  lowest  value  of  i  such  that  x. 
v  ai  — — —  ^ 

is  to  the  right  of  x  ,  . 

°  val 

A  refinement  of  this  process  can  be  made  by  allowing  the 

specification  of  a  tolerance  for  the  search.  If  £  is  such  a 

tolerance,  then  INDHI  finds  the  highest  value  of  i  such  that  Xj^ 

is  to  the  left  of  the  interval  (x  ,  -  ,x  ,+  )•  INDLOW  finds 

vai  vai 

the  lowest  value  of  i  such  that  is  to  the  right  of  the 
interval  (xval-  ,xval+  ). 


The  operation  of  these  two  functions  is  described  below 


m 

pukction  indhi(xval,x,n,eps> 


Function 


Given  that  the  array  X  contains  a  sequence  {x^}  of  monotonic 
increasing  or  decreasing  values  of  x,  then  INDHI  finds  the 
highest  value  of  i  such  that  x^  is  to  the  right  of  *vai *  (see 
Section  4.4.2.).  An  error  margin, €•  ,  is  allowed  for  so  that  for 
{x^}  increasing, 

INDHI  *  max{i  :  xt  <  xva^“^ 
and  for  {x^>  decreasing, 

INDHI  »  max{i  :  x^  >  *Vai+€J* 

Parameter  List 

XVAL:  Value  of  x  for  which  the  index  is  required. 

X:  Array  containing  {x^}. 

N:  Number  of  values  in  {x^}. 

EPS!  Error  tolerance  ,  C  . 

Operation 

For  (x^)  both  increasing  and  decreasing,  the  required  index 

is  locafted  by  searching  from  i“N  to  1*  1  until  the  first  node  is 

found  that  meets  either  xi<xva2.“^*  increasing),  or 

x  >x  ,  +  f,  ((x,}  decreasing), 
i  val  i 

Note  that  if  all  the  values  in  {x^}  arc  greater  than  x,  INDHI 
returns  the  value  0. 
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FUNCTION  INDLOW(XVAL, X, N, EPS ) 
Function 


Given  that  the  array  X  contains  a  sequence  {x^}  of 
monotontic  Increasing  or  deceasing  values  of  x,  then  INDLOW 
finds  the  lowest  value  of  1  such  that  x^  is  to  the  left  of  *va^> 
(see  Section  4.4.2.).  An  error  margin,  €_,  is  allowed  for  so 
that  for  {x^}  increasing, 

INDLOW  -  min{  i  :  xt  >  *val  +  £-> 
or  for  (xi>  decreasing, 

INDLOW  -  min(i  :  <  *val“t> 

Parameter  List 

XV AL:  Value  of  x  for  which  the  index  is  required. 

X:  Array  containing  {x^,}. 

N:  Number  of  values  in  {x^}. 

EPSjError  tolerance, 

Operation 

For  {x^>  both  Increasing  and  decreasing,  the  required  index 

is  located  by  searching  from  i*I  to  i“N  until  the  first  node  is 

found  that  meets  either  xi>xvai+^»  ({Xj}  increasing),  or 

x  <x  , ({x.  decreasing), 
i  val  i 

Note  that  is  all  the  values  of  (x^>  are  less  than  x,  INDLOW 
returns  the  Value  N+l . 


4.4.3.  Merging 


Given  two  monotonic  increasing  sequences,  (x^>  and  (x^} 
say,  of  a  variable,  x  say,  the  operation  of  merging  these 
sequences  to  form  a  new  sequence  (x^)  can  b®  defined  in  the 
following  way. 

The  new  sequence  contains  a  stictly  monotonic  sequence  of 

values  of  x  selected  from  (x^>  and  {x^>.  Values  of  (x^>  and 

{ Xj  >  that  are  coincident,  (either  within  the  original 

sequences  or  between  sequences),  within  a  'zone  of 

coincidence'  ,  £  ,  are  coalecsed  as  a  single  value  in  (x^)*  The 

sequence  (x^)  can  be  vignetted  so  that  values  within  the 

interval  [x  J  ,x  ]  only  are  included.  If  no  values  in  (x  } 
min  max  1 

or  (x.)  are  coincident  within  x  .  and  x  (within  £  )  then  the 
j  min  max 

limiting  values  are  inserted  in  the  sequence  { x^ > . 

In  all  cases  the  smallest  value  of  x  in  the  sequence  { x^ )  Is 
that  with  k-1. 

If  one  of  the  sequences  (xt>  or  (Xj>  is  empty,  then  the 

operation  of  merging  reduces  to  a  vignetting  operation  to 

produce  a  sequence  confined  to  the  interval  [x  ,x  ]• 
r  min  max 

Subroutine  MERGE,  described  below,  performs  the  operation 
of  merging. 
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SUBROUTINE  MERGE (X 1 ,M 1 , X2 , M2 , OUT , XLOW , XHIGH , EPS  ) 

Eunc  tion 

Given  two  monotonic  increasing  sequences  of  values  of  x, 
({x^}  and  {jc  }),  stored  in  the  arrays  XI  and  X2,  MERGE  forms  a 
new  monotonic  increasing  sequence  of  values,  <x^>,  according 
to  the  definitions  given  in  Section  4. A. 3. 

Parameter  List 

XI:  Array  containing  {x^}. 

Ml:Number  of  values  in  <x^>. 

X2:  Array  containing  {x^}. 

M2:  number  of  values  in  {Xj>. 

OUT:  Array  in  which  the  new  sequence  will  be  returned  to  the 
calling  code. 

M:  On  entry;  number  of  values  OUT  can  store.  Returned  as 
the  number  of  values  placed  in  OUT. 

XLOW:  Lower  limit  for  x  in  the  new  sequence. 

XHIGH:  Upper  limit  for  x  in  the  new  sequence. 

EPS:  Coincidence  margin. 

Significant  local  variables 

EMPT'fl:  Logical  switch  signifying,  when  true,  that  {x^  is 

empty . 

EMPTY2:  Logical  switch  signifying,  when  true,  that  {x^>  is 

empty. 

J:  Counter  for  OUT.  Location  of  last  entered  value. 

II:  Counter  for  XI.  Location  of  next  value  to  be 
considered  for  placement  in  the  new  sequence. 


I 

li 


of  next  value  to 


12: 

L1LAST: 
L 2LAST : 

CURR: 
Error  M 
(i) 


Counter  for  X2.  Location 
considered  for  placement  in  new  sequence* 

Location  of  last  acceptable  value  in  XI. 

Location  of  last  acceptable  value  in  X2. 

Last  value  placed  in  the  new  sequence. 

essages 

'ERROR  IN  MERGE  ...  XLOW  IS  GREATER  THAN  XHIGH ' 
'XLOW  -  ****&  XHIGH  -  ***** 


5.  DESCRIPTION  OF  THE  NERF  COMPUTER  CODE 


The  previous  Chapter  described  the  various  numerical 
methods  and  associated  FORTRAN  subroutines  and  functions 
which,  although  part  of  NERF  may,  in  principle,  be  used 
separately.  These  routines  were  capable  of  description  as 
separate  entities.  The  remainder  of  the  routines  which 
comprise  the  NERF  computer  program  perform  operations  that  are 
more  specifically  related  to  the  evaluation  of  reliability 
functions:  their  descriptions  are  more  effectively  made  when 
considered  as  part  of  the  overall  computer  program. 


5.1.  General  Coding  Philosophies  and  Methods 

NERF  was  designed  primarily  to  evaluate  the  reliability 
functions  derived  in  Chapter  3.  A  secondary,  and  vitally 
important  objective  was  to  provide  versatile  methods  for  data 
input,  result  presentation  and  fault  diagnosis.  It  is 
therefore  a  large  program  but  is  highly  modular,  containing 
over  100  FORTRAN  subroutines  or  functions,  each  of  which 
performs  a  well  defined  and  specific  task. 

The  construction  of  a  computer  program  of  this  sire  requires 
careful  thought  and  the  subsequent  documentation  more  so. 
Generally,  the  code  was  written  in  such  a  way  that  a  balance 
between  computational  efficiency  and  code  'transparency'  was 
achieved.  To  a  large  extent,  'transparency'  was  assured  by  the 
high  degree  of  modularity;  the  majority  of  subroutines  contain 
less  than  one  page  of  coding  and  each  significant  operation 
within  a  routine  is  separated  by  appropriate  comments  so  that, 
given  a  statement  of  a  routine's  operation,  an  experienced 
FORTRAN  programmer  should  have  little  difficulty  establishing 
'what  the  code  is  doing'. 

The  subroutines  in  NERF  form  a  hierarchy  typical  of  any 
large  computer  program.  At  the  apex  of  the  hierarchy,  the 
'main  program'  controls  the  overall  sequence  of  operations.  At 
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the  base  of  the  hierarchy  there  are  many  subroutines  vhich 
perform  basic  numerical  or  communications  tasks.  The  bulk  of 
the  routines  lie  between  these  two  extremes.  The  higher  a 
subroutine  or  function  is  in  the  hierarchy  the  more  global  is 
its  operation. 

The  documentation  presented  in  this  Chapter  concentrates 
most  heavily  on  the  higher  level  subroutines.  Each  routine  is 
described  ,  at  least,  by  a  stylised  summary  as  developed  in  the 
previous  Chapter.  For  many  low  level  routines,  this  summary 
together  with  the  code  itself  is  sufficient  documentation. 
Higher  level  routines,  because  of  the  more  general  and  often 
complex  interaction  with  other  routines  may  require  flow 
diagrams  and,  especially  in  the  case  of  the  mathematical 
functions  used  to  evaluate  the  reliability  functions,  detailed 
mathematical  descriptions. 

In  these  descriptions  and  flow  diagrams,  a  mixed  notation 
comprising  both  mathematical  symbols  and  program  variable 
names  is  used.  Often  the  mixed  notation  will  provide  implicit 
definition  of  local  variables  in  a  routine:  because  most 
routines  are  short,  explicit  definition  of  all  local  variables 
is  not  given. 

Variables  in  COMMON  storage  are,  however,  described  in 
detail  in  Appendix  A. 2.  COMMON  storage  is  structured, 
consisting  of  many  named  COMMON  blocks  each  of  which  contains  a 
small  number  of  related  variables.  It  is  suggested  that  the 
reader  becomes  familiar  with  the  variable  names  before 
attempting  to  understand  the  detailed  documentation  presented 
in  this  Chapter. 

The  current  version  of  NERF  is  the  result  of  several  years 
of  development  of  computer  programs  for  the  evaluation  of 
reliability  functions  and  this  development  has  spanned  several 
changes  in  mathematical  notation.  Consequently,  the  names  of 
many  of  the  variables  do  not  bear  an  obvious  relationship  with 
the  mathematical  entities  they  represent.  Thus  far  it  has 
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been  considered  impractical  to  uaderteke  the  large  task  of 
changing  the  variables  names  throughout  the  code. 


5.2.  Principal  Phases  of  Operation  and  Program  Output 


The  sequence  of  general  operations  performed  by  NERF  can 
be  divided  into  five  phases;  Initialisation,  data  input  and 
initialisation  of  the  computational  algorithms,  the  construction 
of  a  time  sequence  of  reliability  functions,  the  calculation 
of  strength  distributions  and,  finally,  program  termination. 

This  sequence  of  operations  is  controlled  by  the  'main 
program',  called  PROGRAM  NERF,  which  resides  at  the  apex  of  the 
hierarchy  of  subroutines  in  NERF.  The  control  of  major  operations 
is  effected  by  calls  to  appropriate  subroutines,  the  description 
of  which  forms  the  bulk  of  the  remainder  of  this  Section. 

The  first  phase,  'initialisation',  is  short  and  is 
executed  by  code  within  PROGRAM  NERF.  The. run  time  clock 
is  initialised  by  calling  a  system  supplied  subroutine,  TIMES, 
which  computes  the  current  job  time  in  milliseconds.  The  various 
output  files  (see  Section  5^2.6)  are  opened  and  the  time  and  date 
written  on  selected  output  files. 

The  other  four  phases  are  more  significant  and  are  described 
in  the  following  Sections. 


PROGRAM  NERF 
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Function 

PROGRAM  NERF  controls  the  general  sequence  of  operations  of 
the  NERF  computer  program. 

Operation 

PROGRAM  NERF  controls  the  sequence  of  operations  listed  In 
Table  5.1.  These  operations  fall  into  five  phases  as 
identified  in  Section  5.2. 

Generally  the  role  of  PROGRAM  NERF  is  to  transfer  control 
between  the  various  subroutines  that  perform  the  major 
operations  in  each  phase.  The  exception  is  the  code  associated 
with  the  first  paase  which  initialises  various  output  files  and 
intitlalises  the  timing  routines  which  accumulate  the  run  time 
for  the  computer  program. 

Note  that  prior  to  calling  CFIN,  PROGRAM  NERF  reads  the 
first  two  records  of  the  control  file  to  determine  the  run 
identification  and  to  establish  whether  the  run  is  interactive 
or  batch.  This  information  is  required  by  the  code  in  PROGRAM 
NERF  prior  to  the  call  to  CFIN  which  actually  re-reads  these 
variables.  This  seemingly  redundant  action  was  unavoidable  if 
CFIN  was  to  be  accessible  by  other  programs  (such  as  NERPRE  and 
NERPLT)  which  may  have  no  reason  to  access  the  control  file 
directly. 
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Phase 

Operation 

Subroutine 

1. 

Start  run-time  clock. 

TIMES 

Initialisation 

Open  Control  file. 

Open  output  files 
(see  Section  5 .2.6). 

Write  date  and  time 
on  selected  output 
files. 

2. 

Data  input  and 

Read  data  from  Control 

CFIN 

algorithm 

file. 

initialisation 

Initialise  functions 
and  probability  densities. 

CFIN 

Write  abbreviated  heading 
on  secondary  output  and 
data  files. 

Initialise  loss  factor 
interpolation. 

SETTAB 

Initialise 

nodal  arrays. 

RFSET 

Write  heading  on  primary 
output  file. 

HEAD 

3. 

Construction  of  time 

ADVNCE 

sequence 

k. 

Calculation  of 
strength  distributions 

FLPROB 

5. 

Update  Control  file  with 

Termination 

new  run  number  and  restart 
information. 

CFNEW 

Terminate  program  and 
output  run  time. 

FINISH 

Table  5.1.  The  phases  of  operation  as  controlled  by  PROGRAM 
NERF. 


5.2.1.  Data  Input  and  Initialisation  of  computational  algorithms 


Input  data  for  the  NERF  computer  program  is  assumed  to  exist 
on  the  files  listed  in  Table  5.2.  The  control  file  contains  the 
data  and  control  parameters  necessary  to  define  a  given  run. 

The  function  files  define  the  input  functions  by  specifying 
ordered  pairs  of  function  and  argument  values. 

The  control  file  is  read  by  the  subroutine  CFIN  and  its 
format  is  specified  in  the  documentation  for  that  subroutine. 

The  function  files  are  read  by  the  subroutine  READFN  which  is 
called  during  initial  entry  into  each  of  the  functions  used  to 
evaluate  the  input  functions.  The  format  for  these  data  files 
is  specified  in  the  documentation  for  READFN. 

The  control  and  function  files  can  be  produced  directly  by  using 
the  usual  text  editing  facilities  provided  by  the  computer 
system  on  which  NERF  is  installed  and  adhering  to  the  specified 
formats.  However  the  recommended  method  is  to  use  the 
preprocessor  NERPRE  which  provides  data  editing  facilities  and 
by  virtue  of  the  fact  that  it  uses  CFIN  and  READFN  Itself, 
ensures  that  the  data  files  are  compatible  with  NERF. 

The  final  input  file  in  the  Table,  GCOM.DAT,  contains  a  dump 
of  the  loss  factor  interpolation  table.  This  is  a  binary  file 
and  is  produced  by  NERF  via  subroutine  SETTAB .  It  is  not 
possible  for  the  user  to  produce  this  file  in  any  other  way. 

Setting  aside  the  initialisation  of  output  files  and  run 
timing  procedures  carried  out  by  the  code  in  PROGRAM  NERF,  the 
data  initialisation  phase  consists  of  the  following  steps. 

(i)  The  data  defining  the  run  is  read  from  the  control  file 
and  the  input  functions  and  probability  density 
functions  initialised.  This  step  is  executed  by  CFIN. 

(11)  Default  limits  are  set  and,  if  required,  the  loss  factor 
interpolation  cable  is  constructed.  SETTAB  performs 
these  functions. 


File  Name 

Logical 
Unit  No. 

Type 

Contents 

Documentation 

CO NT RL. IN 

7 

Control 

Control  data 
defining  run 

Table  5. 

3. 

(CNAME).FCN 

2 

Function 

Ordered  pairs 
for  a(t) 

Section 

5.3.U 

(PNAME).FCN 

2 

Function 

Ordered  pairs 
for  R(a) 

Section 

5.3.2. 

(RNAME).FCN 

2 

Function 

Ordered  pairs 
for  PL($) 

Section 

5.3.3. 

(DNAME).FCN 

2 

Function 

Ordered  pairs 
for  Cd(a) 

Section 

5.3.4. 

GCOM. DAT 

7 

Loss 

factor 

table 

Nodes  used  for 
loss  factor 
interpolation 

Section 

5-4. 

Table  5.2..  Input  data  files  accessed  by  NERF. 


A  name  in  parentheses  indicates  the  variable  in  which 
the  file  name  is  stored  in  NERF.  The  name  consisting 
of  up  to  5  characters  is  read  by  NERF  from  the  control 
file. 


(Hi)  RFSET  is  called  to  calculate  nodes  for  the  evaluation  of 

pffi(t‘V* 


The  operations  performed  by  these  routines  are 
described  below. 
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SUBROUTINE  CFIN(ICODE) 
Function 


CFIN  reads  the  control  file  and  initialises  the  input 
functions  and  probability  density  functions. 

Parameter  List 

ICODE:  Control  parameter  which  determines  the  extent  of  the 
operations  performed  by  CFIN,  according  to  the 
following  definitions. 

1;  The  control  file  is  read  up  to,  but  excluding,  the 
inspection  information. 

1,'  The  complete  control  file  is  read,  but  no  further 
processing  is  made. 

3;  The  complete  control  file  is  read  and  the  input 
functions  and  probability  density  functions 
initialised  . 

Operation 


NERF  reads  a  'control  file'  called  CONTRL . IN  which  contains 
all  the  control  parameters  for  a- given  run.  The  file  also 
contains  information  necessary  to  re-commence  calculations 
from  a  previous  run  which  had  terminated  prematurely  because  of 
run  time  limitiations . 

The  format  of  this  file  is  specified  in  Table  5.3.  and  the 
operation  of  the  subroutine  in  so  far  as  the  input  of  data  is 
concerned,  is  a  direct  implementation  of  this  specification. 

Data  initialisation  within  CFIN  is  concerned  primarily  with 
the  input  functions  and  probability  density  function.  The 
former  are  Initialised  by  using  the  appropriate  function 
routines  to  activate  the  initialisation  coding  within  them. 
For  example. 
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Re  cord 

Format 

Name 

Type 

Meaning 

1 

15 

j 

TITLE ( 1 ) 

text 

Run  I.D.  (incl.  number) 

2 

L1,G 

BATCH 

logical 

Batch  switch 

2 

G 

STINE 

real 

Run  time  (minutes) 

3 

G 

RMUO 

real 

RQ,  median  initial  strength 

4 

G 

RATEL  j 

real 

1  ,  load  application  rate 

5 

G 

CNO 

real 

Sq,  initial  crack  length 

6 

G 

KALP 

integer 

p.d.  f.  identifier  -  53- 

7 

G 

ALP  Cl 

real 

8 

G 

ALPC2 

real 

p.d.  f.  parameters  -  Xj. 

9 

G 

ALPC3 

real 

to 

G 

ALPMIN 

real 

ala  value  for  <*-. 

11 

G 

ALP  MAX 

real 

max  value  for  oc 

12 

G 

KBET 

Integer 

p.d.  &  identifier  - 

13 

G 

BETC1 

real 

14 

G 

BETC2 

real 

p.d. f.  parameters  -  Xj 

15 

G 

BETC3 

real 

16 

G 

BETMIN 

real  . 

min  value  for  X1 

17 

G 

BSTMAX 

real 

max  value  for  X1 

18 

G 

KCRK 

integer 

p.d.f.  identifier  -  aQ  (of  xj 

19 

G 

CRK1 

real 

20 

G 

CRK2 

real 

p.d.  f  parameters  -  Sg  (ocXt) 

21 

G 

CRK3 

real 

22 

A5 

REAMS 

text 

5  chr.  name  for  load 
function  file 

23 

15 

PNAME 

text 

5  chr.  name  for  strength 
function  file. 

24 

A5 

CNAME 

text 

3  chr.  name  for  crack 
■  growth  function  file. 

25 

A5 

DNAME 

text 

5  chr.  name  for  crack 
length  inspection 
function  file. 

26 

G 

EPS 

real 

integration  convergence 
criterion 

27 

G 

RLXV 

real 

Max.  no.  of  levels 

28 

G 

RVALS 

real 

Max.  no.  of  evaluations 

29 

8L1 

POPLOS 

logical 

Population  losses  switch 

FULSV 

logical 

Full  survivorship  switch 

CONTI 

logical 

n.  a.  (no  longer  used) 

PERI 

logical 

Periodic  inspection  switch 

Table  5.3.  Specification  for  the  control  file,  CQNTRL.  IN, 


Be  cord 

Format 

Name 

Type 

Meaning 

29 

8L1 

LIMBSK 

logical 

Limit  risk  inspection 

( cont. ) 

switch 

INSLOS 

logical 

replacement  switch 

VIRGIN 

logical 

uncracked  risk  switch 

RESTART 

logical 

re-start  switch 

30 

3L1 

ALP CON 

logical 

constant  oc  switch 

BET  CON 

logical 

constant  X ^  (or  £ )  switch 

RNOCON 

logical 

constant  a^  (or  nQ)  switch 

31 

a 

NMAX 

Integer 

N,  number  of  evaluation 
times 

32 

to 

.G 

RNSVAL 

Array  of  evaluation  times, 

32+HMAX 

V 

33+NMAX 

G 

NDMAX 

integer 

M,  number  of  strength 
distribution  times. 

34rtfMAX 

to 

G 

RNDIST 

real 

t_  ,  strength  distribution 
“  times 

34  tNMAX 

-t-NDMAX 

Bad  of  first  group  of  data 

35+NKAX 

G 

NIMAX 

Integer 

J,  number  of  Inspection 

♦NDKAX 

times  * 

36  ♦NMAX 

-Wf  EM  AX 

to 

G 

RNINS 

real 

ti  ,  inspection  times 

36 +NMAX 

J 

♦NDMAX 

♦NIMAX 

s36+NTOT 

' 

37*NTOT 

a 

CND 

real 

a.  crack  length  inspection 

criterion 

38  +NT0T 

G 

PLD 

real 

R  ,  proof  load  inspection 

"  criterion 

39  ♦•NTOT 

G 

RLMRSK(I) 

real 

first  limit  risk 

40  ♦NTOT 

41  +NT0T 

RLMRSK(2) 

real 

second  limit  risk 

to 

G 

RSK 

real 

contents  of  common 

56  ♦NTOT 

block, RLSKCM;  re-start 
Information 

Bad  of  second 

group  of  data 

Table  5.3»  Continued 


i¥f 

XXX  -  CRKGR(O.O) 

will  initialise  the  crack  growth  function,  (and  assign  XXX  the 
value  a q ( 0 ) )  •  The  latter  are  initialised  by  calling  the 
appropriate  seating  routines,  (e.g.  BETSET  to  initialise 
Pg(£))  followed  by  the  subroutine  RANGE  to  find  the  sensible 
limits  for  the  random  variable.  These  limits  override  those 
input  via  the  control  file  only  if  they  represent  a  tighter 
restriction  of  the  random  variable.  In  the  case  of  initial 
crack  length,  the  input  limits  are  assumed  to  be  such  that 
initial  age  lies  in  the  interval  [t^.t^],  (corresponding  to  the 
default  limits  (3.48)  and  (3.49)),  and  following 
initialisation,  a  normalisation  factor  is  computed  using  the 
adaptive  integration  function  ADAPT2.  The  denaity  function  is  then, 
modified  via  the  function  RN ONRM .  For  further  details  of  the 
initialisation  of  the  density  functions  refer  to  the 
documentation  of  relevant  functions  in  Section  5.<f*4. 


Several  minor  data  initialisation  operations  are  executed 
by  CFIN.  These  are  itemised  below. 

(i)  The  integration  control  parameters  are  transferred  to 
the  relevant  storage  locations  in  each  of  the  three 
adaptive  integration  routines  which  are  also 
initialised  via  the  subroutine  ADASET. 


(ii)  If  population  losses  are  ignored  by  the  model  (POPLOS  ■ 

true),  then  P_(t)  mus t  be  computed  from  r(t).  In  this 
A 

case,  FULSV  is  set  fal se  ,  overriding  any  setting  given  by  the 


(ill)  The  re-start  option  is  not  permitted  if  RNSOLD,  (the 
last  value  of  t)  is  zero.  In  this  case  RESTRT  is  set 
false,  overiding  the  setting  in  the  control  file. 


(iv)  The  uncracked  structures  switch,  VIRGIN,  is  set  true 
only  when  7^0,  «g“0  and  VIRGIN  is  true  in  the  control 
file. 


(v)  A  model  Is  flagged  as  having  constant  Initial  crack 
length  if  either  CNO  (aQ)  is  set  to  zero  in  the  control 
file  or  the  switch  RNOCON  has  been  set  true. 

(vi)  NOUT  is  set  to  idenitify  the  outermost  level  of 
integration . 
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SUBROUTINE  RFSET (RFARG, IK) 
Function 


The  evaluation  of  Pffi^t.ng)  involves  an  Integration  along 
the  line  *f(£)  •  This  integration  has  been  found  to 

require  that  nodal  values  for  cC  which  correspond  to  those  in 
used  to  define  f<P>  are  used  as  a  basis  for  the  adaptive 
integration  stategy.  Subroutine  RFSET  calculates  those 
nodes  • 

Parameter  List 

RFARG:  Array  into  which  the  ec  nodes  are  returned  to  the 
calling  code  • 

IK:  Number  of  nodes  in  RFARG* 

Operation 


The  limits  of  integration  for  of.  are  (from  equation  (3.97)), 

R«in/f(Pp,R  )  and  <*2(t* (Rmi„)*Rmin)-  .  l8n0ring  the  effects 
r  min 

of  the  proof  load  inspection  boundary  and  variations  in  nQ,  the 
limits  for  the  ot  nodes  are. 


max{0tmin*Rmin/f(ri)>  S  «-  <  ■io<**ax’Rmin/f  ^  > 


(5.1) 


Because  of  the  limiting  assmptions  made  by  the  function  PSINV, 
corresponding  (?  limits  can  be  found  by. 


-  PSINV (RM IN /ALPMIN ) 

-  ^min^mi:)) 


(5.2) 


and 

4_„  *  PSINV(RMIN /ALPMAX) 

v  ID  AX 

-  min{tf,^l(Rnin/ocax> 


(5.3) 


These  limits  are  calculated  by  RFSET  and  used,  via  the 


subroutine  MERGE,  to  produce  a  vignetted  sequence  of  £  nodes. 
The  Q  nodes  are  then  converted  to  «■  nodes,  (using  the 
relationship  oL"Rmin^^^  >  • 

Note  that  RFSET  must  be  called  after  SETTAB  to  ensure  that 
the  correct  default  limits  have  been  set. 


SUBROUTINE  SETTAB 


Function 

Subroutine  SETTAB  sets  the  default  limits  for  R  and  ^  and 
initialises  the  loss  factor  interpolation  table.  The 
subroutine  also  controls  Che  construction  of  contour  maps  of 
the  loss  factor  functions. 

Operation 


A  flow  diagram  of  the  major  operations  performed  by  SETTAB 
is  shown  in  Figure  5.1.  Those  operations  associated  with  the 
initialisation  of  the  loss  factor  interpolation  table  are 
described  in  Section  5.4.2.  The  description  presented  here 
pertains  specifically  to  the  calculation  of  the  default 
limits,  the  graphical  operations  and  the  more  mundane  aspects 
of  the  subroutine  documentation  (e.g.  COMMON  variables 
changed )  . 

( i)  Default  limits 

The  default  limits  are  defined  by  equations  (3.43) 
to  (3.49).  Those  for  Uq  are  set  by  CFIN,  or  following  an 
inspection,  ADVNCE.  The  remainder  are  set  during  the 
first  sectlou  of  the  code  in  SETTAB. 


Using  primes  to  denote  the  input  values  of 
variables,  the  limits  for  R  are 


R  -  RMAX 

BAX 


Bln<*»ax’*- 


AM IN  1 (ALPMAX, R (M) ) 


(5.4) 


and 


R  .  -  RM IN 

min 


-  AM A XI ( ALPMIN *PSI (RNF ) , R ( 1 ) ) 


(5.5) 


After  setting  these  limits,  the  interpolation  tables 


Figure  5.1.  Flow  diagram  for  the  major  operations  performed  by 
SETTAB. 


Figure  5.1.  Continued 


for  rj(R)  are  altered  accordingly  using  the  subroutine 
MERGE  to  vlgnet  the  sequence  of  ordered  pairs  and 
function  RLOSET  to  recalculate  the  interpolation 
tables  . 

The  default  Halts  for  £  are, 

tt  -  RM1  “  ««<tl'‘Vrl(Raax/<tain)} 

-  AM A XI (RNI , PSINV (R (M) / ALPMIN ) )  (5.6) 

and 

rt  - 

-  AMIN  1  (RNP , PSINV (R (M) /ALPMAX) ) .  (5.7) 


Subroutine  MERGE  is  used  to  vlgnet  the  ordered  pairs 
defining  y/(($)  and  to  include  three  additional  pairs 
having  £  values,  fl(Raax/et.Mx),  f 1  (R^  M-ln >  and 

r1  (R  .  /R  )  which  are  used  in  the  construction  of 
mill  max 

the  loss  factor  interpolation  table  (Section  5.4.1.) 
The  Interpolation  tables  for  y(0)  are  then  modified 
using  PSISET  (Section  5.3.2). 

(it)  Loss  factor  table 

When  the  loss  factor  interpolation  table  Is 
constructed,  SETTAB  dumps  a  binary  record  of  it  in  a 
file  called  GCOM.DAT .  Before  constructing  any  table 
SETTAB  accesses  this  file  and  checks  whether  the 
existing  table  is  satisfactory.  If  the  variables 
listed  in  table  5.4.  are  in  agreement  with  those 
recorded  in  GCOM.DAT,  the  construction  of  a  new  table  is 
bypassed . 

(ill)  Contour  maos  of  loss  factor  functions 

SETTAB  provides  for  the  optional  printing  and 
contour  map  construction  of  the  functions 


Variable 

Name 

Si gni ficance 

RNAME 

Name  of  file  containing  F^CR) 

pname 

Name  of  file  containing  R(a) 

CNAME 

Name  of  file  containing  a(t) 

RNI 

^  (after  default  limiting) 

ALPMIN 

^min  Lower  for  <*• 

ALP MAX 

«Am  Upper  limit  for 

EPSINT 

t  ,  Error  criterion  for 
adaptive  integration 

X 

Number  of  nodes  defining  y(f), 
after  range  adjustment  by 

SETTAB 

KLIM 

Number  of  nodes  allocated  for 
at  direction  interpolation 
for  the  loss  factor  table, 
see  Section  5.4. 

Table  5.4.  Variables  tested  for  acceptance  of  a 
loss  factor  table  3tored  in  GCOM.DAT, 


I 


L 


A 


and 


called  Che  'G  integral'  and  the  '6  function' 
respectively.  The  significance  of  these  functions  is 
described  in  Section  5.4.  The  last  section  of  code  in 
SETTAB  controls  the  construction  of  the  maps  using  the 
subroutine  INTPLT. 


COMMON  Variables  Changed 

BETA:  Array  of  (3  values  defining  f(f). 

PS:  Array  of  y>  values  defining 
N:  Number  of  ordered  pairs  defining  *<?>• 
R:  Array  of  R  values  defining  r2(R). 

RLD:  Array  of  values  of  log(r2(R)). 

M:  Number  of  ordered  pairs  defining  r2(R). 


RNO:  Current  value  of  ng. 

,G:  Two-dimensional  array  containing  loss 
interpolation  table. 


fee  tor 


KLIM:  Number  of  rows  in  the  loss  factor  interpolation  table. 
ALP1:  Array  of  lower tt  limits  for  loss  factor  Interpolation . 
ALP2:  Array  or  lower «C limits  for  loss  factor  interpolation. 
BETV:  Current  value  of 
ALPV:  Current  value  of  oC> 

GEXP:  Work  space  in  Block  GCOM. 


i! 

fl 

D 

n 


i 


Iff 


Significant  Local  Variables 

RMIN:  Minimum  value  of  R. 

RMAX:  Maximum  value  of  R. 

BETLOW:  Minimum  value  of  ^  • 

BETHIG:  Maximum  value  of  (3. 

PSIV:  Current  value  of  i^(^) . 

ICOUNT:  Integer  array  containing  the  numbers  of  function 
evaluations  used  to  calculate  the  values  in  the  loss 
factor  interpolation  table*  (Shares  space  with  GEXP.) 

GEXP:  Used  durig  the  last  stages  of  SETTAB  to  store  the  loss 
factor  functions  prior  to  printing  or  contour  map 
construction . 

Prompts 

(i)  'R  LIMITS  BEING  CHANGED';  The  default  limit  equations 
imply  a  change  to  the  range  of  R. 

(ii)  'TI  IS  BEING  CHANGED':  The  default  limit  equations 
imply  a  change  to  • 

(iii)  'TP  IS  BEING  CHANGED':  The  default  limit  equations 
imply  a  change  to  tj  • 

(iv)  'DATA  FILE  NOT  ACCEPT  ABLE  ...  G  BEING  CALCULATED':  The 
data  in  GCOM.DAT  is  not  acceptable. 

(v)  'G  ARRAY  READ  FROM  DISK  PILE':  The  data  in  GCOM.DAT  is 
acceptable  • 

(vi)  'PRINT  G  INTEGRAL?':  Request  for  user  response  whether 
to  print  the  G  integral. 


(vil)  'PLOT  G  INTERAL?':  Request  for  user  response  whether  to 
construct  contour  maps  of  the  G  integral. 


( viii)  'PRINT  G  FUNCTION?';  Request  for  user  response  whether 
to  print  the  G  function. 

(ix)  'PtOT  G  FUNCTION?';  Request  for  user  response  whether 
to  construct  a  contour  map  of  the  G  function. 


Uf 

5.2.2.  Development  of  a  time  sequence  including  inspections 

Following  the  data  initialisation  phase,  the  time  sequence 
of  reliability  functions  can  be  constructed.  This  phase,  which 
accounts  for  most  of  the  computational  effort  made  by  NERF  is 
controlled  by  the  subroutine  ADVNCE. 

The  reliability  functions  are  computed  at  time  values  (t^) 
which  are  a  combination  of  the  sequences  (tn>,  (evaluation 
times),  (tij>,  (inspection  times)  and  (tg^),  (strength 
distribution  times)  as  outlined  in  Section  3.6.  These 
sequences  are  specified  as  part  of  control  file  data  or,  in  the 
case  of  {ti ^  and  £t^n^  can  be  computed  by  SERF . 

During  this  phase,  all  the  reliability  functions  save  for 
the  strength  distributions  are  computed  at  each  value  of  t^ . 
Sufficient  data  is  stored  at  each  value  of  tj}m  to  pe-rmit  the 
code  associated  with  the  following  phase  to  compute  the 
strength  distributions  with  a  minimum  of  effort. 

Although  the  overall  construction  of  the  time  sequence  is 
controlled  by  the  subroutine  ADVNCE,  function  RSKTOT  which 
computes  the  set  of  reliability  functions  at  a  given  value  of 
time  makes  a  significant  contribution  to  the  generation  of  the 
time  sequence..  This  function  is  therefore  included  in  the 
descriptions  presented  below. 


SUBROUTINE  ADVNCE 


3£>% 


Function 


Subroutine  ADVNCE  controls  the  construction  of  a  time 
sequence  of  reliability  functions. 

Operation 

ADVNCE  contains  two  main  sections  of  code.  The  first 
initialises  all  the  variables  required  during  the  development 
of  the  time  sequence.  The  second  section  constructs  the 
sequence  . 

( i)  Section  1 

The  operations  performed  by  the  first  section  of 
code  in  ADVANCE  are  best  described  in  the  order  they 
appear  in  the  code.  The  paragraphs  below  correspond 
approximately  to  the  various  sub-sections  of  the 
code,  (as  identified  by  comments  in  the  program 
listing )  . 

The  set  of  reliability  functions  and  various  related 
parameters  are  stored  in  the  COMMON  block  RISKCM. 
Although  the  variables  in  all  COMMON  blocks  are  defined 
in  Appendix  A. 2.,  those  in  RISKCM  are  listed  in  Table 
5. S',  for  easy  reference. 

The  first  set  of  operations  are  associated  with 
initialisation  of  flags  and  preliminary  output.  The 
flags  INTOFF  and  the  switch  OUTINT  are  given  default 
values  and  the  subroutine  OUTPUT  is  called  to  provide 
appropriate  headings  on  the  primary  output  file. 

The  merging  of  the  two  sequences  <  t Q >  and  {t^} 
commences  with  the  setting  of  the  three  switches 
FLSTOR,  BEFORE  and  AFTER  which  are  used  by  subsequennt 
coding  to  store  data  at  specified  values  of  tgm,  store 
data  Just  before  each  Inspection  or  store  data  just 


Variable 

Name 


RLT 

RSLT 

RFLT 

RTOT 

RS 

RF 

HV 

AVGRS 

AVGLT 

RLTINS 


Symbol 


Significance 


PS(t> 

rs(t).Ps(t) 
rf(t).Pg(t) 
r(  t) 

rs(t) 

rf(t) 

r  (t) 
v 


Probability  of  Survival 


Total  risk  rate 

Risk  of  static  fracture 

Risk  of  fatigue  life 
exhaustion 

Virgin  risk 


E(F).PF(t) 


E(F) 


Expected  time  to  failure 
(Equation  3. 176). 

Fraction  of  population 
removed  by  all  previous 
inspections 


RNSOLD 

ROLDLT 

RNIM 

RDET 


t 

Pf,(t) 


] 


Within  RSKTOT  these 
have  the  value  at  the 
list  time  of  evaluation 


ti. 


time  of  last  inspection 


EWtV 


Probability  of  detection 
at  the  last  inspection 
(Calculated  by  ADVNCE) 


RMEAN 


r 

mean 


(t) 


Mean  risk  (equation  3.175) 


Table  5.5.  Variables  stored  in  the  common  block  RISKCM. 

Unless  otherwise  specified,  definitions  refer 
to  value  on  exit  from  RSKTOT. 


after  each  inspection  respectively*  If  the  either  of 
the  last  two  switches  are  true,  the  sequence  { t„  >  is 
empty  and  no  merging  is  necessary.  Otherwise  the 
necessary  merge  is  controlled  by  the  subrootlne  MERGE. 

It  is  possible  to  're-start'  NERF  following 
premature  termination  of  a  previous  run.  If  the  switch 
RESTRT  is  true,  INDLOW  is  used  to  find  the  first  value 
in  the  evaluation  time  sequence  which  is  greater  than 
the  last  value  computed  (RNSOLD).  Otherwise  RSTART, 
(the  first  time  value)  is  set  to  RNSVAL(l). 

Similarly  the  first  specified  inspection  time 
following  the  last  time  of  evaluation  must  be  found  and 
the  relevant  parameters  set  accordingly.  If  a  restart 
is  not  required,  those  parameters  are  set  to  their 
initial  values.  The  relevant  paramters,  their  variable 
names  and  intitial  values  are  listed  in  Table  5»6.  Note 
that  if  the  limit  risk  and  periodic  inspection  switches 
are  both  set  true,  then  only  one  time  value  is  allowed 
in  the  specified  inspection  time  sequence  {tij> 
(RNINS  )  . 

If  a  restart  is  specified,  then  the  starting  value  of 
the  reliability  functions  are  assumed  to  be  stored  in 
RISKCM,  having  been  read  from  the  control  file. 
Otherwise,  the  initial  values  corresponding  to  time  t*0 
are  set.  Because  the  values  for  t"0  are  not  considered 
to  be  part  of  the  program  output,  initial  values  are 
written  on  the  primary  output  file  (via  OUTPUT)  in  the 
case  of  a  restart  only. 

The  final  part  of  the  code  in  the  first  section  of 
ADVNCE  writes  an  appropriate  warning  on  the  output 
files  if  Pg(t)  Is  being  computed  from  r(t)  by 
approximate  integration,  checks  that  at  least  one  time 
value  has  been  specified  and  in  the  case  of  an 
interactive  run  for  which  a  single  time  value  is 


Variable 

Name 


Symbol 


Value 


RLT 

Ps(t) 

1 

RTOT 

r(t) 

0 

RS 

rs(t) 

0 

RV 

rv(t) 

0 

RF 

rf(  t) 

0 

RMEAN 

r  ( t) 

mean 

0 

AVGRS 

E(F)Pp(  t) 

0 

AVGLT 

ECF) 

0 

RLTINS 

0 

RNS 

t 

0 

RNSOLD 

tk-1 

0 

ROLDLT 

PFCt) 

SMALL 

lf\ 

1 

o 

T“- 

Table  5.6.  Variables  initialised  by  ADVNCE  and 


their  initial  values, 


specified,  seeks  a  response  from  the  user  to  activate 
the  optional  graphics  support  functions  provided  by 
NERF. 

( ii)  Section  2 

The  second  section  of  code  in  ADVNCE  evaluates  the 

time  sequence  of  reliability  functions.  Given  the 

already  merged  sequences,  {t  '}  and  <  tn  >  stored  in  the 

n  Kin 

array  RNSVAL,  the  bulk  of  the  code  in  this  section  is 
concerned  with  the  inclusion  of  the  inspection  times 
and  accounting  correctly  for  the  effects  of  the 
inspections  according  to  the  options  that  have  been 
selected  . 

Most  of  the  code  in  this  section  is  contained  within 
a  DO  LOOP  which  terminates  at  statement  labelled  290  and 
sweeps  through  the  sequence  of  time  values  stored  in 
RNSVAL.  The  logic  associated, with  the  embedding  of  the 
inspection  times  within  the  overall  sequence  is  shown 
in  Figure  5.2. 

As  each  value  of  t^  is  selected  from  RNSVAL,  it  is 
checked,  initially  to  ensure  that  it  is  not  zero,  and 
then  to  determine  if  an  inspection  precedes  it.  In  the 
case  of  periodic  inspections,  this  is  simply  a  matter  of 
accessing  the  time  of  the  next  inspection,  stored  in 
R1NSP. 

If  the  limit  risk  procedure  has  been  selected,  the 
total  risk  at  the  current  value  of  t^  is  computed  and 
compared  with  the  limit  risk  (RTEST).  If  the  risk  is 
too  large,  an  inspection  is  inserted  in  the  interval 
(tjLagt,tk),  where  is  the  last  time  value  at  which 
the  reliability  functions  were  evaluated,  (which  is  not 
necessarily  t^_^ )  .  This  Inspection  time  is  found  by 
solving  the  equation 


inspection  times  in  the  overall  sequence. 


log  (  r  (  t)  )  -  log  (RTEST  ) 


(5.8) 


using  the  function  FSOLVE  as  described  in  Section  4.3. 

Once  the  inspection  time  hase  been  computed  (by 
either  method)  the  Inspection  is  incorporated  into  the 
model.  This  operation  is  expanded  in  Figure  5.3  and  is 
detailed  more  precisely  in  (iii)  below.  Control  is  then 
returned  to  the  point  where  t^  has  just  been  selected 
and  the  whole  process  is  repeated  until  no  further 
Inspections  can  be  included  before  tfc . 

Note  that  if  following  a  limit  risk  inspection  the 
risk  rate  cannot  be  reduced  below  RTEST,  the  limit  risk 
process  is  terminated  and  no  further  inspections  are 
attempted  . 

Once  all  the  inspections  preceding  t^  have  been 
found,  the  reliability  functions  are  computed  for  t»t^. 
If  FLSTOR  is  true  and  t^  corresponds  to  a  value  in 
RNDTST,  Pp(t),  Pg(t)  and  tij  are  stored  in  the  next 
available*”  locations  in  RSLTDS,.  RLTDS  and  RNIMDS 
respectively. 

The  code,  excluding  that  between  statements  180  and 
250  which  are  described  below,  follows  the  logic  in 
Figure  5.2  in  an  obvious  manner.  The  code  relies  on  the 
function  RSKTOT  to  return  r(t)  at  the  current  value  of 
time  and  to  update  the  reliability  functions  stored  in 
Che  COMMON  block  RISKCM.  The  subroutine  OUTPUT  is  used 
to  record  these  functions  on  the  primary  output  file. 
(Section  5.2.6.) 

(iii)  Inspections 

Once  an  inspection  time  has  been  determined,  the 
effect  of  the  inspection  is  incorporated  into  the  model 
by  the  logic  shown  in  Figure  5.3.  This  logic  controls 
the  output  of  the  reliability  functions  just  before  the 


Figura  5.3.  Logic  asaociatad  with  incorporating  tha  affact 
of  an  lnspaction  in  tha  do dal. 
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Inspection,  the  adjustment  of  the  Inspection  dependent 
parameters  in  the  model  and  the  calculation  of  the 
reliability  functions  immediately  following  the 
inspection.  Provision  is  also  made  for  the  storage  of 
the  parameters  required  to  compute  the  strength 
distributions  either  before  or  after  each  inspection. 

This  code  also  calculates  the  probability  of 
detection,  @  t ( t ) ,  at  the  inspection.  If  Pg(t)  is 
calculated  by  an  approximate  integration  of  r(t), 
(FULSV-true)  ,  then  an  integral  expression  for  Pdet(t) 
must  be  used.  This  is  controlled  by  the  function  FDET 
which  must  be  called  prior  to  the  alteration  of  the 
inspection  dependent  parameters  of  the  model.  If  there 
is  no  replacement  at  the  inspection,  Pdet(t)  I3 
subtracted  from  Pg(t),  (RLT).  Note  that  once  this 
change  to  RLT  has  been  made  the  effect  is  permenant  only 
when  P_(t)  is  calculated  by  integrating  r(t). 

If  Pg(t)  1*  calculated  via  a  full  Integral 

expression  for  P^(t),  then  ^det^6^  can  evaluated  by 

taking  the  difference  between  P„(t)  Just  before  and 
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just  after  the  inspection.  This  calculation  must,  of 
course,  be  made  after  the  inspection  dependent 
parameters  have  been  changed. 


If  structures  removed  during  an  Inspection  are 
replaced  by  'perfect  structures'  (see  Section  3.6.2.) 
the  probability  of  survival  is  corrected  by  equation 
(3.183)  in  function  RSKTOT.  The  sum  of  the  P^€t(t) 
terms  for  all  previous  inspections  is  stored  in  RLTINS 
which  is  updated  by  ADVNCE.  This  means  that  the  value 


°f  V*’ 

is  in 


calculated  by  RSKTOT  just  after  the  inspection 
error  and  appropriate  adjustments  to  all 


functions  depending  on  Pg(t)  for  their  evaluation  are 
made. 


*7/ 


Graphics  Operations 


During  an  Interactive  run  which  involves  a  single 
evaluation  time,  NERF  provides  the  facility  for  constructing 
various  graphical  representations  of  the  Integrations.  ADVMCE 
seeks  a  response  from  the  user  regarding  this  option. 


Significant  Local  Variables 
RNDS:  Stored  value  of  t^. 

RND 1 :  Maximum  value  of  t^  as  determined  by  the  proof  load 


Umit.  f1  OpSa*'* 

FLSTOR:  Logical  switch.  If  true  strength  distribution  data  is 
stored  at  the  specified  times  stored  in  RNDIST. 

AFTER:  Logical  switch.  If  true,  strength  distribution  data 
is  stored  just  after  each  inspection. 

BEFORE:  Logical  switch.  If  true,  strength  distribution  data 
is  stored  just  before  each  inspection. 

Ml:  Temporary  upper  limit  for  UMAX. 

RNSHIN:  Minimum  value  for  <t  }. 

n 

RNSMAX:  Maximum  value  for  {t  >. 

n 

IDCDRR:  Location  of  the  next  free  storage  areas  for  strength 
distribution  data. 


RSTART:  Starting  value  of  time  for  the  current  run. 

ISTART:  Initial  value  of  k,  (index  for  { t ^ > )  for  the  current 
run  . 

RIMSP:  Time  of  the  next  inspection. 

RTEST:  Current  value  of  limit  risk. 


RHIM 


Last  inspection  time 


Rl:  Logarithm  of  the  last  value  of  total  risk,  r(t) 


I:  Main  DO  LOOP  index,  •  k. 
Prompts 


(i)  '  WARNING  FOR  SURVIVORSHIP  CALCULATION 
IF  THE  TIME  INTERVALS  ARE  LARGE 
FULL  SURVIVORSHIP  SHOULD  BE  USED': 

Written  only  when  FULSV  is  false.  Warns  use  that 
lnt  oration  of  r(t)  to  yield  Pg(t)  is  approximate. 

(ii)  'DURING  THE  CALCULATION  OF  RISK 
ARE  PLOTS  REQUIRED' 

Prompts  the  user  to  select  the  optional  information 
plotting  facilities.  Appears  only  when  a  single 
evaluation  time  has  been  specified  and  during  an 
interactive  run. 

(ill)  'INTEGRATION  INFORMATION  PLOTTED'  Echoes  the  user's 
request  to  plot  integation  Information. 

(iv)  'FINDING  RNS  CORRESPONDING  TO  LIMIT  RISK':  Notification 
that  FSOLVE  la  controlling  the  time  that  the 
reliability  functions  are  being  evaluated  to  find  a 
limit  risk  inspection. 

(v)  'RISK  AT  INSPECTION':  Notifcatlon  that  any  following 
prompts  are  associated  with  the  evaluation  of  the 
reliability  functions  Just  prior  to  an  Inspection. 

(vi)  'RISK  FOLLOWING  AN  INSPECTION':  Notification  that  any 
following  prompts  are  associated  with  the  evaluation  of 
the  reliability  functions  just  efter  an  inspection. 

Error  Messages 


(1)  'NO  TIME  VALUES':  There 
distribution 
terminated . 


are  no  evaluation  or  strength 
specified.  Processing  is 


times 
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(11)  'RISK  AFTER  IESPECTIOR  GREATER  THAT  LIMIT  RISK*! 
Inspection  has  failed  to  reduce  the  risk  rate  below 
limit*  Mo  further  Inspections  are  attempted* 


FUNCTION  RSKTOT (RNS ) 


Function 

RSKTOT  returns  the  value  of  r(t)  for  a  given  value  of  time, 
RNS.  The  function  also  evaluates  the  reliability  functions 
Ps(t),  rv(t),  rg(t),  rf(t),  *aean(t)  and  E  (F)  together  with 
other  time  dependent  functions  used  in  the  derivation  of  the 
reliability  functions  and  stores  the  results  in  the  COMMON 
block  RISKCM  (see  Table  5.S). 

Parameter  List 

RNS:  Value  of  time  for  which  the  evaluation  of  r(t)  is 
required . 

Operation 

The  code  in  RSKTOT  folows  the  logic  shown  in  figure  5.4  and 
commences  operations  by  writing  a  heading  for  the  current  value 
of  time  via  the  subroutine  PROMPT  and  constructing,  if 
required,  a  contour  map  of  the  loss  factor.  The  remainder  of 
the  operations  is  simply  a  systematic  progression  through  the 
evaluation  of  the  required  reliability  functions. 

Having  set  the  COMMON  varaible  RNSV  to  the  new  value  of  time 
and  transmitting  that  value  to  the  functions  which  evaluate 
P^(@)  (via  BETCNG),  RSKTOT  evaluates  the  three  functions 
ra(t)Pg(t),  rf (t)Ps(t)  and  rv(t)Pg(t)  which  are  stored  in 
RSLT,  RFLT  and  RVLT  respectively.  Depending  on  the  class  of 
model,  the  first  two  functions  are  evaluated  either  by 
integrations  over  initial  crack  length  using  ADAPTO  or  by 
making  point  evaluations  of  the  relevant  integrand  functions. 
In  the  former  case,  integration  limits  f<  r  a and  ng  are  found 
according  to  the  logic  described  in  Section  5.6  below.  The 
.third  function  is  evaluation  by  a  single  call  to  FRVO. 

If  FULSV  is  true,  so  that  Pg(t)  is  calculated  via  an 
integral  expression  for  P?(t),  ADAPTO  is  used  again,  using  the 
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sane  limits  as  used  for  r  (t)P-(t).  If  replacement  at 
inspections  has  been  selected  the  cumulative  probabilities  of 
detection  for  previous  inspections  are  added  to  Pg(t). 

If  FULSV  is  false,  Pg(t)  is  calculated  by  integrating  the 
risk  rate  using  equation  (3.186).  This  evaluation  makes  use  of 
the  following  equations  which  define  relevant  local  variables. 

RLT  -  RLT..  _  -  RLTDEL  (5.9) 
las  t 


where 

RLTDEL  -  (pp(t)  -  PF<  tiagt)  )*DNS 

/  ( log  ( pp  (t)  /pp(tlaat>)  (5.10) 

DNS  -  t  -  ciaat  *  RNSV  -  RNSOLD  (5.11) 

PF(t)  -  RTOTLT  (5.12) 

and 

Pp( tiast^  *  ROLDLT.  (5.13) 


Note  that  is  is  not  necessary  that  t>tiast**  Tt,e  integration 
can  yeild  acceptable  results  during  the  determination  of  a 
limit  risk  inspection  time.  However,  it  is  recommended  that 
the  more  accurate  full  integration  for  Pg(t)  is  used  for  limit 

m * 

risk  calculations. 

If  RLT  drops  below  zero,  the  operation  of  NERF  is 
terminated . 

The  calculation  of  the  expected  time  to  failure  follows 
equation  (3.178)  with  the  following, 


277 


AVGRS  -  tp  (t) 

F 

-  iVOSSLsc  +  C0,,1*(t->>F")-tl*sfVtl..t> 

+  CO«l*(ps,(t)-p  F<tla7tl)  (5.14) 

com  4  lt-.lu[)/U.,(v(.)ZPp(.lilt)l 

-  (RNS-RNSOLD ) /ALOG (PDF/PDFOLD ) .  (5.15) 


The  expected  time  to  failure  is  then  given  by 


E (F)  -  AVGLT 

-  AVRGRS/RLT 


(5.16) 


RSKTOT  completes  its  operation  by  computing  the  functions 
rv(c),  rf(t),  rg(t)  and  r(t)  which  can  be  obtained  trivially 
from  the  functions  already  computed. 

Prompts 

(i)  'INFORMATION - NS  -  ***** 

Heading  to  indicate  that  a  new  time  value  is  relevant. 

(ii)  PLOT  LOSS  FACTOR?':  Prompt  to  seek  user  response 
whether  to  plot  contour  map  of  loss  factor. 

(iii)  RISK  FUNCTION  RSLT ' :  Notification  that  any  subsequent 
prompts  are  associated  with  the  calculation  of 
r  (t)P.(t) . 

3  L 

(iv)  'RF.  TERM':  Notification  that  calculation  of  rf(t)  has 
commenced  . 

(v)  'PROBABILITY  OF  FAILURE':  Notification  that  the 
calculation  of  P^(t)  has  commenced. 


Ii  AM'.  tiH'i  NIHI  A  CUMPUHR  PROGRAM  f  OR  IH|  NUMIRICAl  IVAIUAIJON  4/1 
Of  RtMABUIH  fUN  llll  At  RONAUt  tCA(  Rf  SI  ARCH  l  ABS 
Ml  I  BOURN!  lAUSIRAlUl  G  D  MAlllNSON  El  A|.  SIP  R3 
llfll  l  A', Ml  !H>  ARl  /SIRUC  3<37  f  /(.  9/?  Ml 
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Error  Message 

<i)  'PROBABILITY  OF  SURVIVAL  HAS  REDUCED  TO  0.0'j  Pg(t)  has 
reduced  to  below  zero.  KERF  it  terminated. 


FUNCTION  RSKLOG  (ARG) 


Func  t  loti 

RSKI.OG  returns  the  value  of  log(r(t))  for  a  given  value  of 
time  (ARC) 

Parameter  List  ARG:  Value  of  time  for  which  the  evaluation 
is  required. 

Operation 

RSKLOG  relies  on  the  function  RSKTOT  to  calculate  r(t)  and 
then  computes  the  logarithm  in  a  trivial  manner. 


the  chlcd  phase  of  operation  of  NERF  Is  the  evaluation  of 

reliability  functions  related  to  variations  in  strength.  The 

basic  strength  functions  are  the  density  functions  pR(R|t)  and 

p_(R|F>t).  The  corresponding  distributions  P_ (R It)  and 
R  **  R, 

P^(RlF>t)  and  expected  values,  E(R|t)  and  E(R|F>t)  are  defined 
by  equations  (3*  1 8 1 )  to  (3.184)  and  can  be  calculated  from  the 
density  functions. 

Upon  completion  of  the  previous  phase,  the  sequence  of  time 
for  which  the  strength  functions  are  required  {tp^}  is  known 
and  the  values  of  Pg(t),  pp(t)  and  tij  for  each  of  these  times 
has  been  stored  in  the  COMMON  block  DISCOM. 

The  calculation  of  the  Strength  distributions  is  controlled 
by  the  subroutine  FLPROB  which  essentially  constructs  tables 
of  values  of  p  (R) t)  and  p_(R|F>t)  for  the  specified  values  of 
tRjn  and  for  values  of  R  in  the  interval 
(max{Rmln,«tmln<p(tf )  >,min(Rina3{  .t^})  .  Once  these  tables  have 
been  constructed  and  output  to  the  primary  output  file  and  to 
function  files  for  subsequent  plotting,  the  table  values  are 
integrated  to  produce  the  remaining  functions  which  are  then 
similarly  output. 

The  operation  of  FLPROB  is  described  below. 
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SUBROUTINE  FLPROB 


Fane t Ion 

FLPROB  controls  the  calculation  of  the  reliability 
functions  that  are  related  to  the  variation  in  strength.  These 
functions  are;  pR(Rlt),  PR(Rlt)  and  E  (R 1 1 )  the  density, 
distribution  and  expected  value  of  the  failing  load  and 
P^RlE^t),  P^(R|F>t)  and  E(R|P>t),  the  density,  distribution 
and  expected  value  of  strength. 


Operation 


FLPROB  contains  code  which  is  directly  related  to  the 
evaluation  of  p  (R\t)  and  p_(R|P>t).  This  code  is  detailed  in 

K  K 

Section  5.8.  The  remainder"’of  the  code  is  concerned  with  the 
broader  aspects  of  the  construction  of  tables  of  the  strength 
functions  and  is  the  subject  of  this  description. 


The  sequence  of  operations  follows  the  logic  shown  in  Figure 
5.5.  On  initial  entry  into  the  subroutine,  the  limits  for  R 
(RMIN.RMAX)  are  calculated  and  the  storage  aggangements  for 


the  tables  of  functions  established.  Both  pR(R|F>t)  and 


p^(R|t)  are 
of  R.  NDMAX. 


calculated  for  NOMAX  values  of 
is  the  number  of  values  in  the 


time  and  Ml  values 
sequence  {  tR(B>  an*1 


Ml  is  the  number  of  values  of  R.  Ml  is  set  within  the  code  in 


FLPROB  and  is  currently  set  at  101.  The  tables  are  organised  as 
N 1  columns  of  Ml  values  where  Nl*NDMAX+t,  the  first  column 


containing  the  Ml  values  of  R. 


Both  tables  occupy  space  in  the  GEXP  array  (COMMON  block 
GCOM) .  p R | t )  is  stored  in  the  first  MI*NI  locations, 
P»(Rl^>t)  in  locations  1251  to  1250  +M1*N1.  (This  arrangement 
assumes  that  there  are  at  most  10  values  in  (tRm>  and  that  GEXP 
as  been  allocated  2500  words.* 


The  two  density  functions  are  evaluated  simultaneously  in  a 
nested  DO  LOOP  sequence.  The  outer  loop  sweeps  through  (t^m>; 
the  inner  loop  through  the  values  of  R.  As  mentioned  above. 


Figure  5.5.  Sequence  of  **4or  operation*  in  FLPROB 
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much  of  the  code  in  these  loops  is  concerned  with  the 
evaluation  of  the  density  functions  and  is  described  in  Section 

5.  a. 


Following  these  loops,  the  density  function  in  GEXP  is 
output  to  the  prirapay  output  file  and  to  functions  files  for 
late  plotting  by  NERPLT.  Trapezoidal  integration  is  then  used 
to  integrate  each  column  over  R  to  produce  the  cumulative 
distribution  and  the  expected  value  •  The  new  table  containing 
values  of  the  distribution  is  then  output,  together  with  the 
Nl-1  values  of  the  expected  value. 


The  contents  of  PI  ,(p^(R J F > t ) ^are  then  transferred  to  GEXP 
and  the  operations  in  the  penultimate  paragraph  repeated. 


Significant  Local  Variables 


RMIN:  Minimum  value  for  R  for  the  evaluation  of  the  strength 
functions.  (Vote  that  this  minimum  is  not  necessarily 

*«in*> 

RMAX:  Maximum  value  of  R  for  the  evaluation  of  the  strength 
functions  . 


Ml:  Nusber  of  values  of  R. 

Nl:  Number  of  columns  in  table.  Nl-MOIST+l  where  NDIST  is 
the  number  of  values  in  <  cfttB ^  * 

Pis  Array  storage  for  the  table  of  values  of  the  density 
function  for  strength. 

GEXP;  Array  storage  for  the  table  of  values  of  the  density 
for  the  failing  load. 

Tl:  Storage  array  for  residual  term  for  the  density  for  the 
falling  load  . 

EXTNS:  Array  containing  text  strings  which  define  the  file 
name  extensions  for  the  function  files  containing  the 
strength  functions. 


LARLS:  Array  containing  text  strings  used  to  construct  table 
headings. 

Prompts 

(i)  'STRENGTH  DISTRIBUTION  CALCULATIONS':  Notification 
that  the  strength  calculations  have  commenced. 

(ii)  'INFORMATION  *****  TIME  -  ****':  Notification  that 

functions  for  a  new  time  value  are  being  calculated. 


Ms 


5.2.4.  Termination 


SERF  can  terminate  in  three  ways  . 

(i)  The  sequence  of  operations  can  reach  the  end  of  PROGRAM 
NERF. 

(ii)  The  allowed  run  time  can  be  exceeded,  as  detected  by 
subroutine  EXTIME 

(ill)  An  error  condition  can  result  in  premature  cessation  of 
operations. 

Conditions  (i)  and  (ii)  can  be  treated  together  as  'normal 
terminations'.  In  such  cases,  a  new  control  file  is  produced 
by  the  subroutine  CFNEW  so  that  the  next  run  can  use  updated 
information.  In  cases  where  an  error  condition  has  occurred, 
the  control  file  is  not  updated  as  it  is  assumed  that  the  run 
will  recommence  from  the  initial  (or  user  altered)  control 
file. 

In  all  cases  final  termination  is  made  by  the  subroutine 
FINISH  which  calculates  the  program  run  time  before  completing 
the  run . 

The  subroutines  CFNEW  and  CFOOT  are  described  below.  EXTIME 
and  FINISH  are  described  in  Section  5.9. 


SUBROUTINE  CFNEN 


Func  t ion 

CFNEW  produces  an  updated  control  file  following  normal 
termination  of  the  operation  of  NERF.  The  new  control  file 
contains  an  undated  run  number,  new  inpsection  times  and  new 
contents  for  the  COMMON  block  RISKCM. 

Operation 


CFNEW  controls  the  following  operations. 

(i)  The  original  control  file  is  read  to  restore  the  first 
grouo  of  data  to  their  original  values. 

(ii)  The  run  number  is  decoded  from  the  text  string  in  TITLE, 
the  run  number  incremented  by  one  and  a  new  text  string 
is  generated. 

(lii)  CFOUT  is  called  to  output  the  new  control  file. 

(iv)  The  text  string  in  TITLE  is  restored  to  its  original 
form  for  use  by  the  subroutine  FINISH. 


SUBROUTINE  CFOUT 


Function 


CFOUT  creates  a  new  control  file  from  the  data  stored  in 
NSRF. 

Operation 

CFOUT  is  actually  an  entry  point  in  the  subroutine  CFI*t  and 
essentially  mimics  the  input  operations  performed  by  that 
subroutine.  CFIN  outputs  both  groups  of  data. 


The  description  of  NERF  has  so  far  concentrated  on  the 
sequence  of  operations  required  to  generate  the  reliability 
functions.  In  this  Section  the  various  output  facilities 
provided  by  KERF  are  described. 

The  computer  program  NERF  is,  in  fact,  one  of  a  suite  of 
three  programs,  NERPRE,  NERF  and  NERPLT  which  combine  to  form 
a  complete  facility  for  the  evaluation  of  reliability  functions 
for  fatigue.  The  program  NERPRE  has  already  been  referred  to  and 
provides  an  interactive  facility  for  generating  the  control 
file  ( CONTRL. IN)  and  various  function  files  which  define  the 
input  functions  as  sequences  of  ordered  pairs  of  argument  and  function 
values.  NERPLT  is  an  interactive  plotting  program  which  can  plot 
combinations  of  functions  defined  by  function  files,  or  the 
probability  density  functions  used  by  NERF. 

The  relationships  between  these  programs  and  the  various 
input  and  output  files  is  shown  schematically  in  Figure  5.6. 

The  input  data,  which  has  already  been  described  in  Section  5.2.1., 
consists  of  the  control  file,  the  loss  factor  interpolation  table 
and  function  files  defining  a(t),  R(a),  PL(R)  and  C^(a).  The 
loss  factor  table  (GCOM.DAT)  is  optional  and  can  only  be  produced 
by  NERF  via  the  subroutine  SETTAE.  The  presence  of  GCOM.DAT  as 
an  input  file  serves  only  to  save  computational  effort:  it  is 
not  necessary  to  define  the  reliability  calculation. 


Figure  5.6.  The  relationships  between  the  three  programs 
NERPRE,  NERF  and  NERPLT  and  the  various  input 
and  output  files. 


The  'output  data'  (as  identified  in  Figure  5.6)  produced 
by  NERF  is  in  the  form  of  function  files  which  define  the  reliability 
functions  as  sets  of  ordered  pairs.  These  function  files  have 
a  format  which  is  similar  to  that  of  the  input  function  files 
(specified  by  the  function  READFN  described  in  Section  5.9)  but 
which  allows  several  functions  to  be  tabluated  for  the  same  set 
of  argument  values.  The  only  program  which  can  read  these  files 
is  NERFPLT  which  program's  function  is  identified  in  Figure  5.6 
as  the  production  of  'function  plots'. 

During  the  creation  of  the  time  sequence  of  reliability 
functions  a  function  file  containing  r( t) ,  rs(t),  rf(t),  ry(t) 

PF(t),  Ps(t),  E(F)  and  rmean(t)  for  all  the  values  t^.  For  time 
values  corresponding  to  inspections,  the  function  P ^ ^ ( t )  is 
also  tabulated. 

Similar  function  files  are  produced  by  the  subroutine  FLPROB 

to  define  the  various  strength  distributions.  Four  files  are 

produced  each  containing  a  single  function  for  several  values 

of  time  (t_  )  tabulated  for  a  range  of  values  of  R  as  determined 
Km 

automatically  by  NERF.  The  five  function  files  produced  during 
a  single  run  by  NERF  are  summarised  in  Table  5.7. 

Note  that  the  file  names  for  the  function  all  have  the 
same  'roof,  v^g,  the  title  for  the  run.  The  current  version  of 
NERPRE  constructs  a  title  which  consists  of  a  two  character  ident 
identification  followed  by  a  three  character  number,  (e.g.  LM300). 
The  extension  identifies  the  function  file. 


File  Name 


Contents 


IDNUM.FCN 

r<t) 

Total  risk  rate 

ra(t) 

Risk  of  static  fracture 

rf(t) 

Risk  of  fatigue  life 
exhaustion 

rv(t) 

Virgin  risk 

Pj.(t) 

Probability  of  failure 

Ps(t) 

Probability  of  survival 

E(F) 

rmean^  ^ 

Expected  time  to  failure 

IDNUM.FLD 

prcr  it) 

Density  for  the  failing 
load 

IDNUM. FLD 

PR(Hlt) 

Distribution  of  the 
failing  load 

IDNUM.RSD 

PH(R|  F>t) 

Density  for  strength 

IDNUM. RSP 

pr(R  1  F  >  t) 

Distribution  of  strength 

Table  5.7.  summary  of  function  files  produced  by  NERF. 

Note  that  IDNUM  stands  for  the  5  character 
string  identifying  the  run. 


la  addition  to  the  function  files,  NERF  produces  3 
text  records  of  the  program  operation,  a  primary  output  file 
containing  the  main  results  of  the  calculations,  a  secondary 
output  file  containing  information  regarding  the  numerical 
integrations  and  a  dialogue  on  the  remote  terminal  from  which 
SERF  is  rim.  The  last  can  be  omitted  by  running  KERF 
in  the  Batch  mode.  This  can  be  done  from  the  remote  terminal 
to  supress  unwanted  output,  or  as  was  originally  intended,  to 
permit  KERF  to  be  run  in  an  overnight  batch  stream.  (The  batch 
option  is  specified  by  setting  BATCH  »true  in  the  inpirt  data; 

Table  5.3.) 

The  primary  output  file  is  the  'official  record'  of 
a  run.  It  contains  a  heading,  produced  by  the  subroutine  HEAD, 
which  records  all  the  relevant  input  data.  The  heading  is  followed 
by  a  tabulation  of  the  time  dependent  reliability  functions.  This 
tabulation  is  then  followed  by  tabulations  of  the  strength 
distributions. 

The  secondary  file  contains  the  record  of  all  the  numerical 
processes  used  to  generate  the  reliability  functions.  Each 
integration  produces  an  informative  prompt  regarding  the  error 
estimates  and  number  of  function  evaluations  used.  Warning  and 
error  messages  issued  by  the  various  numerical  algorithms  also 
appear  in  the  secondary  output  file.  The  secondary  file  is  the 
'operator's'  record  of  the  run. 

Output  to  the  primary  output  file  is  handled  by  the  subroutines 
HEAD,  OUTPUT  and  FLPROE  together  with  a  small  section  of  code 


in  PROGRAM  NERF.  HEAD  constructs  the  heading  echoing  the  input 
data.  OUTPUT  constructs  the  table  of  time  dependent  reliability 
functions  and  also  transmits  the  required  information  to  the 
time  sequence  function  file.  FLPROB  constructs  the  tables  of 
strength  distributions. 

The  secondary  output  file  receives  a  heading  from  PROGRAM 

KERF.  Otherwise  all  output  to  this  file  passes  through  the 

routines  ARROUT,  PROMPT  and  ECHO.  ARROUT  writes  the  contents 

of  a  two-dimensional  array  and  is  used  to  dump  the  loss 

factor  table  or  two-dimensional  integrand  functions  if  requested 

during  an  interactive  run.  Hiring  a  batch  run  only  the  loss  factor 

table  (if  created)  is  dumped  in  this  way.  A  companion  subroutine 
IRROUT  performs  the  same  operation  for  integer  arrays. 

The  subroutine  PROMPT  is  used  to  write  messages  to  the 
secondary  file.  The  subroutine  also  transmits  the  messages  to 
the  remote  terminal  if  the  batch  switch  is  off  (i.e  BATCH m  false ). 
The  subroutine  ECHO  writes  operator  responses  into  the  secondary 
output  file. 

Apart  from  a  small  section  of  code  in  SETTAB  which  writes 
a  heading  in  the  secondary  output  file  prior  to  calling  ARROUT 
to  dump  the  loss  factor  table,  the  subroutines  mentioned  in  the 
last  three  paragraphs  are  the  only  sub-programs  in  the  NERF 
program  which  contain  WRITE  statements. 

Output  associated  with  PROGRAM  NERF,  SETTAB  and  FLPROB 
has  already  been  described.  The  subroutines"  ARROUT,  IRROUT,  PROMPT 


and  ECHO  are  described  in  Section  5»9  as  they  are  considered 
to  be  part  of  the  basic  communication  aspects  of  the  program. 
This  leaves  the  subroutines  HEAD  and  OUTPUT  which  are  described 


below. 


SUBROUTINE  HEAD 


Function 

BEAD  writes  informative  headings  into  the  primary  output 
file  (Logical  unit  number  3) 

Operation 


Most  of  the  code  in  HEAD  consists  of  WRITE  statements  and 
appropriate  FORMAT  statements.  The  exception  is  the  small 
section  of  code  near  the  begining  of  the  subroutine  which 
computes  the  loss  factor  term,  R  (R^  ,  t  ^  ,  t  ^  ,  t )  which  is  output  as 
information  regarding  the  significance  of  fatigue  life 
limiting.  If  losses  from  the  population  are  not  neglected, 
then  this  term  can  be  obtained  from  the  loss  factor 
interpolation  table.  Otherwise,  it  must  be  obtained  by 
Integration,  using  the  function  RINTV  (see  Section  5.4.2.) 


SUBROUTINE  OUTPUT (RNS , N?  ) 


Function 


OUTPUT  controls  the  output  of  information  following  the 
evaluation  of  the  reliability  functions. 

Parameter  List 

RNS:  Value  of  time  for  which  the  values  have  been  computed. 
NP:  Control  integer. 

“0:  Headings  are  output. 

•Is  The  time  is  not  an  inspection. 

■2:  The  time  is  just  after  an  inspection. 
■3:  A  list  of  inspection  times  and  the  relevant 
probabilities  of  detection  are  output. 

Operation 


The  only  difference  between  a  non  inspection  output  and  one 
just  following  an  inspection  is  that  the  latter  requires  the 
probability  of  detection  to  be  included  in  the  list  of 
varaibles.  Subject  to  this  comment,  the  operation  of  OUTPUT  is 
a  straightforward  implementation  of  the  above  definitions. 

Full  heading  and  information  are  transmitted  to  the  primary 
output  file  (logical  unit  number  3).  More  concise  information 
is  transmitted  to  the  function  file  for  time  dependent 
functions,  (logical  unit  number  2)  and  during  the  execution  of 
the  heading  mode,  informative  messages  are  transmitted  to  the 
secondary  output  file,  (logical  unit  number  4). 


As  described  ia  the  previous  Sectioa,  the  program 


NERPLT  provides  a  facility  for  constructing  graphs  of  the 
reliability  functions  produced  by  NERF.  Because  these  functions 
are  stored  in  function  files  that  have  the  same  format  as 
those  used  to  define  the  input  functions,  NERPLT  can  also 
be  used  to  plot  any  of  the  input  functions.  Figures  3. 1  to 
3.10  and  3.16  to  3.18  were  produced  by  NERPLT. 


In  addition  to  the  facilities  provided  by  NERPLT,  NERF 
provides  the  following  which  are  available  when  the  program 
is  run  interactively  from  a  remote  terminal. 


(i)  Outer  integrand  plots 


Any  of  the  reliability  functions  can  be  represented 
by  equation  (4.42),  i.e., 


R  - 


Iz(z)dz 


(5. 17) 


where  R  represents  the  reliability  function  and 

z  the  outermost  variable  of  integration.  By  plotting 

the  values  of  I  (z)  as  the  Integrand  is  evaluated, 
z 

a  graph  of  the  function  can  be  constructed.  The 
graph,  constructed  in  this  way,  also  indicates  the 
performance  of  the  adaptive  integration  algorithm 
in  allocating  the  integrand  evaluation  locations. 


This  facility  is  available  for  all  the  reliability 
functions  that  are  evaluated  during  the  construction 
of  the  tine  sequence  and  which  involve  at  least 
one  level  of  integration. 


A  typical  example  is  shown  in  Figure  5.7.  The  graph 


is  for  the  outer  integrand  of  PfsU.nQ)  (  5  Ps(t)rs(t,n0) 


for  example  A.  The  model  has  no  initial  erackes  so 


that  PfsU,0)  is  given  by  equation  (3.96)  with  nQ  =  0, 


i.  e. , 


^f^min5 


Pfs(t.O)  = 


VMmax> 


.  pgc^ )  I  r2U,f)H(o<tp .o.Op^C*.) 

Jp.(o)  V(o.ft) 

1  '  d-cdft 


(5. 18) 


which  for  a  given  value  of  t  can  be  represented  by, 


Pfs( 


' 

;t,o). 

)t- 


(5. 19) 


where, 


). 


r2(*  ,  (S)  H( (J, 0.  t) p^U)  d*.  p?(  f) 


<(0,|i) 


(5.20) 


Figure  5.7.  shows  Fjj(^)  for  t  *  4000  hrs.  Note*  that, 
unlike  the  figures  presented  in  Chapter  3.  Figure  5.7 
contains  the  labels  actually  constructed  by  NERPLT. 
Note  the  heading  contains  the  run  identification, 
UM321  (  run  321  for  the  series  identified  by  * IM  1 ) . 

The  name  RSLT  identifies  PfsU,n0)  and  originated  from 
earlier  notation  for  the  reliability  functions.  The 
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Figure  5.7.  Outer  integrand  plot  for  PfS(tfO) 
for  example  A,  t*  4000  hr$. 


equivalences  between  the  labels  used  by  the  plotting 
facilities  and  the  present  notation  is  given  in  Section 
5. 10. 


(ii)  Integrand  -  function  evaluation  mans 

For  the  moat  general  model  (Section  3.4.2)  with  constant 
nQ,  the  functions  Pj,(t,n0)  and  are  defined 

by  double  integrals.  The  integrands  for  these  functions 
can  be  represented  by  two-dimensional  contour  maps 
as  shown  by  the  example  given  in  Figure  5.8.  This 
map  is  for  the  same  integration  as  the  outer  integral 
plot  shown  in  Figure  5.7.  The  contour  lines  represent 
values  of  the  function, 

•  r2U,(i)H(.i,(i,0,t)p>t(«)(5.21) 

which  is  the  integrand  of  equation  (5.18)  if  the  integration 
is  regarded  as  a  double  integral  rather  than  the  nested 
sequence  represented  by  equations  (5.19)  and  (5.20). 

Note  that  the  integration  domain  is  not  rectangular  and 
follows  the  boundaries  defined  in  Section  3.3. 

Figure  5.9.  shows  an  Integrand  map  for  the  same  function 
but  for  t»1500  following  an  inspection  at  t  *1000  hrs. 

The  limits  shown  in  this  figure  can  be  identified  by 
studying  Figure  3.  13» 
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(iii)  Loss  factor  maps 

Contour  maps  in  ,(3 )  space  for  the  functions  used 

to  evaluate  the  loss  factor,  H(ot,£,nQ,t)  can  also 

be  constructed.  The  significance  of  these  maps 

can  be  appreciated  only  after  the  interpolation  procedures 

for  the  evaluation  of  the  loss  factor  have  been  described. 

For  this  reason,  the  description  of  this  facility 

is  deferred  until  Section  5. lO. 

The  graphics  facilities  described  in  this  Section 
are  provided  by  a  suite  of  graphics  subroutines  which  are 
described  in  Section  5.10.  It  is  possible  to  load  NERF  with 
dummy  routines  which  replace  the  graphics  routines  and  remove, 
completely,  any  reference  to  graphics  software  or  equipment. 

The  graphics  subroutines  can  be  regarded  as  being  distinct 
from  the  main  body  of  the  code  associated  with  the  evaluation 
of  the  reliability  functions. 

Any  further  description  of  the  graphics  code  is  left 
for  Section  5. 10.  The  only  exceptions  to  this  are  those 
sections  of  the  reliability  function  evaluation  code  which 
either  initiate  graphics  operations  or  store  numerical 
values  for  later  access  by  the  graphics  routines.  This  code 
is  described  under  the  heading  'graphics  operations'  in  the 
subroutine  descriptions,  Ce.g.  description  of  ADVNCE,  p  2? 1). 
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5.3.  The  Evaluation  of  Input  Functions 


The  input  functions  comprise  the  density  functions 
for  the  random  variables  and  relationship  between  crack 
length  and  age  (a(T)),  the  relationship  between  strength 
and  crack  length  (R(a)),  the  probability  of  load  exceedence 
(?l(R))  and  the  crack  detection  function  (Cd(a)).  Specifications 
for  these  functions  were  given  in  Section  3.2.  This  Section 
details  the  coding  associated  with  their  evaluation. 


The  functions  a(  t) ,  R(a),  l*L(R)  and  Cd(a)  are  defined 
by  sequences  of  ordered  pairs  of  function  and  argument.  These 
sequences  are  presented  as  input  data  to  KERF  which  generates 

e 

auxiliary  functions  that  are  used  during  the  calculations.  These 
auxiliary  functions  are;  relative  strength  as  a  function  of 
age, 


f  (£)  *  f  (t)  *  R(a(S))/R0 

(5.22) 

two  risk  rate  equations, 

rj(R)  »  TjCoC)  *  lr.PL(*0 

(5.23) 

r2(R)  s.  r2Uf  (0))  «lrPLU«f'(fl)) 

(5.24) 

the  inspection  removal  function, 

Sj(t)  »  1  -  cdC  o.(t)). 

(5.25) 

As  veil  as  these  auxiliary  functions  KERF  also  generates 
inverse  and  derivative  functions  when  required. 

Cubic  spline  interpolation,  using  the  function  FTNTRF 
described  in  Section  4.2,1s  used  to  generate  these  functions 
with  the  function  DERIV  being  used  to  generate  the  derivative. 
The  Inverse  function  Is  found  via  the  secant  method  described 
In  Section  4.3. 


Each  of  the  input  and  auxilary  functions  is  evaluated  by  its 
own  specific  function  routine  in  the  HER?  package*  These 
function  routines  are  written  in  such  a  way  Chat  the  method  of 
evaluation,  whether  by  interpolation  or  not,  is  concealed  from 
the  calling  code.  In  principle,  the  convention  of  using  direct 
evaluation  for  the  density  functions  and  interpolation  for  the 
other  functions  could  be  changed  without  any  effect  to  the  code 
using  the  functions. 

All  functions  are  initialised  the  first  time  the  function  is 
called.  In  some  cases  a  function  requires  another  to  be 
initialised  before  it  can  be  used,  (e.g*  the  derivative 
functions).  Where  possible,  the  initialsatlon  of  such 
pre-requisite  functions  is  automatic.  Where  this  is  not 
achieved  the  documentation  descibes  the  required 
initialisation  sequence.  (The  initialisation  sequence  in  CFIN 
currently  satisfies  all  such  requirements.) 

The  functions  are  described  below  in  groupings  according  to 
the  function  type  as  defined  in  the  input  data,  i.e,  functions 
depending  on  a("t),  R(a)  ,  P L  (R )  f  C^Ca)  or  the  density  functions. 


5.3.1.  Crack  growth  function 


The  crack  growth  function  Is  specified  in  Section  3.2.1  and 
is  evaluated  by  the  function  CRKGR.  The  derivative  function  is 
provided  bby  CRKDEV  and  the  inverse  by  CRKINV. 

Initialisation  is  effected  via  the  call 
XXX  -  PSI(O.O) 

in  CFIN.  Because  the  relative  strength  decay  function  requires 
the  crack  growth  function  initialisation  of  CRKGR  is  provided 
within  PS1. 


FUNCTION  CRKDEV(ARG) 


Function 

CRKDEV  evaluates  the  derivative  of  crack  length  with 
respect  to  age. 

Parameter  List 

ARG:  The  value  of  age  for  which  the  derivative  is  required. 
Operation 

The  derivative  is  evaluated  by  calling  DERIV  which  is  an 
entry  point  in  the  interpolation  software.  No  check  is  made  to 
ensure  that  the  crack  growth  function  has  been  intlalised.  It 
is  up  to  the  calling  software  to  ensure  that  at  least  one  call 
to  CRKGR  is  made  before  calling  CRKDEV. 


FUNCTION  CRKGR(ARG) 


Function 

CRKGR  evaluates  the  crack  growth  function  as  defined  by  a 
set  of  ordered  pairs  of  crack  length  and  age* 

Parameter  List 

ARG:  The  value  of  age,  tf,  at  which  the  crack  length  la 
required  . 

Operation 


The  first  time  CRKGR  is  called,  the  data  defining  the 
function  is  read  from  a  function  file  (identified  by  text  in 
CNAME  in  the  common  block  FNAMES)  using  the  subroutine  REALIN. 
The  interpolation  function  FINTRP  is  then  called  to  lntialise 
the  interpolation  tables  which  will  be  used  throughout  the 
current  run  of  NERF  as  a  basis  for  the  evaluation  of  the  crack 
growth  function.. 

Evaluation  of  the  crack  length  function  is  made  by  calling 
FINTRP  using  the  tables  stored  in  the  common  block  CRKCOM. 

If  ARG  is  less  than  the  first  value  in  RNC  (the  array  of 
argument  values)  the  length  corresponding  to  RNC(l)  Is 
returned . 

Error  Messages 

(i)  'NOT  ENOUGH  STORAGE  FOR  CRACK  GROWTH  FUNCTION';  The 
allocated  space  in  CRKCOM  is  not  sufficient  to  store  the 
data  contained  in  the  function  file.  The  error  is  fatal 
and  the  execution  of  NERF  is  terminated. 

COMMON  Variables  Accessed 

CNAME:  Five  character  root  for  name  of  the  function  file 
containing  the  ordered  pairs  defining  the  crack  growth 
function . 


3cq 

COMMON  Variables  Changed 
(First  call  only.) 

NCRK:  Number  of  data  pairs  defining  the  crack 
function . 

RNC :  Array  of  ages. 


growth 


CRK:  Array  of  crack  lengths 


Vo 


lie 


FUNCTION  CRKINV(ARG) 
Function 


CRKINV  evaluates  the  age  corresponding  to  a  given  crack 
length.  It  is  the  inverse  function  for  CRKGR. 

Parameter  List 

ARG  :  Value  of  crack  length  for  which  the  age  is  required. 
Operation 


The  function  FSOLVE  is  used  to  seek  a  solution  of  the 
equation 

ARG  -  CRKGR  (CRKINV)  .  (5.26) 

Initial  guesses  for  CRKINV  for  use  by  FSOLVE  are  found  by 
ascertaining  the  Interval  in  the  sequence  of  crack  lengths 
which  contains  ARG.  This  is  done  by  calling  INDLOW.  If  ARG  is 
very  close  to  a  node,  the  nodal  value  is  returned.  The 
resolution  of  this  test  is  governed  by  EPS2  is  COMMON  block 
SMALCM.  EPS2  is  set  to  the  order  of  the  precision  of  the 
computer  on  which  NERF  is  installed. 

If  ARG  is  less  than  the  first  crack  length  in  CRK  (the  array 
of  crack  lengths)  ,  then  CRKINV  is  returned  as  the  corresponding 
age.  Similarly  an  argument  greater  than  the  final  crack  length 
returns  the  corresponding  age. 

Note  that  no  test  is  made  to  ensure  that  the  crack  growth 
function  has  been  initialised.  The  external  code  must  ensure 
that  at  least  one  call  to  CRKGR  preceeds  a  call  to  CRKINV. 

COMMON  Variables  Accessed 

RNC:  Array  of  ages  defining  tha  crack  growth  function. 

CRK:  Array  of  crack  lengths  defining  the  crack  growth 
function. 


V( 

5.3.2.  Strength  decay  functions 

The  strength  decay  function  is  specified  in  Section  3.2.2 
and  defines  median  strength  as  a  function  of  crack  length. 
It  is  evaluated  by  the  function  STRFN. 

The  strength  decay  function  is  used  to  generate  the  relative 
strength  function  f/(t)  which  is  given  by  equation  (5.22). 
Given  a(t)  and  R(a),  y'(t)  can  be  defined  for  the  nodal  values  of 
t  used  to  define  a(t)  . 

The  relative  strength  function  is  ipitialised  during  the 
first  call  to  PSI  which  is  subsequently  used  to  provide 
evaluations  of  the  function.  During  this  initialisation  dummy 
calls  to  STRFN  and  CRKGR  are  made  to  ensure  all  relevant 
functions  have  been  initialised.  In  this  way  a  single  call  to 
PSI  in  CFIN  is  sufficient  to  initiaise  all  the  functions  which 
depend  on  a(t)  and  H(a). 

Inverse  and  derivative  functions  are  provided  by  the 
functions  PSINV  and  PSIDEV  respectively. 

A  facility  for  re-establishing  the  interpolation  tables 
following  redefinition  of  the  nodal  values  of  'f(t)  is  provided 
by  PSISET. 
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FUNCTION  PSI(ARG) 

Function 

PSI  evaluates  the  relative  residual  strength  as  a  function 
of  age.  The  function  is  defined  by  a  set  of  ordered  pairs  and 
interpolation  is  used  to  provide  a  continuous  function. 

A  secondary  function  is  the  definition  of  the  initiation 
age,  and  fatigue  life  limit,  "t^  for  the  model.  This  function 
is  provided  the  first  time  PSI  is  called  only.  (Note  that  these 
parameters  are,  in  fact,  specified  by  the  limits  for  the  crack 
growth  function:  these  Unfits  are  also  taken  for 

The  values  of  and  thus  defined  are  subject  to  the 

default  limits  equations  applied  by  SETTAB .  It  is  possible, 
via  PSISET,  to  re-establish  the  definition  of  PSI  to  confirm  to 
the  adjusted  limits. 

Parameter  List 

ARG:  Value  of  age  for  which  the  relative  residual  strength 
is  required. 

Operation 

The  function  PSI*  includes  entry  points  PSISET  and  PSIDEV. 
The  principal  operations  executed  by  the  code  follow  the  flow 
chart  shown  in  Figure  5.10. 

( i)  Initialisation 

The  first  time  PSI  is  called  it  executes  code  which 
initialises  the  interpolation  procedures  for  crack 
growth  and  the  strength  decay  functions.  The  relative 
strength  function  is  then  initialised  by  generating  a 
set  of  ordered  pairs  of  age  and  relative  residual 
strength,  ,  by  evaluating  equation  (.T.2.Z.)  for  each 
value  of  used  to  define  the  crack  growth  function 
a*a(t).  The  set  of  ordered  pairs  thus  generated  are 
then  truncated  to  ensure  that  1* 


P5IMR6) 


Figure  5.10.  Logic  within  FUNCTION  PSI  associated 
with  the  evaluation  of  f(0). 
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Having  established  an  ordered  pair  sequence  defining 
the  interpolation  tables  are  initialised  by 
calling  FINTRP  (see  Section  4.2.2).  The  sequence  of  age 
values  defining  are  also  used  to  define  7^  and  7^  . 

Note  that  7^  is  set  to  be  at  least  equal  to  a  small 
positive  number  so  that  the  condition  f  «0  can  be 
interpeted  as  being  relevant  for  uncracked  structures 
for  which  PSI  will  return  the  value  1.  The 
corresponding  variables  (RNI  and  RNF)  in  COMMON  are  set 
by  this  section  of  the  code  which  can  also  be  accessed 
at  any  time  via  the  alternative  entry  point,  PS1SET. 
This  alternative  entry  can  be  useful  if  external  code 
modifies  the  ordered  pair  sequence  defining  ^(0)  . 

The  interpolation  function  for  r<*  )  is  linear  for 
where  is  the  largest  value  of  the  $ 

sequence  defining  )  for  which  ) >0 .  9 .  The  final 
step  in  the  initialisation  process  is  to  use  the 
subroutine  INDLOW  to  find  the  location  of  this  node  in 
the  sequence  and  to  save  Pj  ^  and  the  corresponding 
value,  in  the  variables  BETJD  and  PSIJD 

respectively. 

( ii)  Evaluation 

Following  initialisation,  evalatlon  of  is 

simply  a  matter  of  using  the  appropriate  interpolating 
function.  If  f<^d^linear  interpolation  is  made  using 
code  within  PSI.  Otherwise  FINTRP  is  used  to  use  cubic 
spline  Interpolation  via  the  tables  previously 
initialised  . 

If  £  is  less  than  the  first  nodal  valuei  t ^  ,  y'is 
returned  with  the  value  1.  If  {S  is  greater  than  the 
largest  0  node^  7g  J  the  value  0  is  returned.  Note  that 
the  function  «^(0)  thus  defined  can  be  discontinuous  at 
each  end  of  the  Interval  It^.t^]. 


3/r 

COMMON  Variables  Changed 


BETA: 

Array  of  ^  values  defining  <^(£)  » 

BET  JD : 

or  £  value  marking  the  transition  from 
interpolation  to  cubic  spline  Interpolation. 

linear 

JD  IF : 

The  number  of  the  node  In  the  (S  sequence  defining  y(^) 
corresponding  to^d* 

N: 

Number  of  ordered  pairs  defining  'f'(fi)  • 

PS : 

Array  of  ^  values  defining  ^(0). 

PS  JD: 

or  ^  value  corresponding  to  See  ®ETJD 

above . 

RNI: 

Current  value  of  t^. 

RNF: 

Current  value  of  t- . 

3/4 
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FUNCTION  PSIDEV(ARG) 
Function 


Eval uate 
to  (i  . 


the  value  of  the  derivative  of  if/(  fi)  with 


respect 


Parameter  List 

ARG:  Value  of  £  for  which  the  derivative  is  required. 
Operation 

PSIDEV  evaluates  the  derivative  of  either  by  using  the 

derivative  of  a  linear  interpolation  equation  for  p _< 
(where  is  defined  by  the  function  PSI)  or  accessing  DERIV 

which  uses  cubic  spline  interpolation. 

If  f!  is  not  in  the  interval  [t1,‘tf],  the  value  0  is  returned 
for  the  derivative. 

Note  that  the  interpolation  tables  must  have  been 
initialised  by  a  previous  call  to  PSI  before  PSIDEV  is  called. 
PSIDEV  is  an  entry  point  in  PSI  and  can  therefore  detect  if  such 
a  call  ha3  been  made.  If  (he  tables  are  not  Initialised  an 
error  message  is  created  and  the  operation  of  NERF  is 
terminated.  (Note  that  this  error  can  only  occur  if  the  NERF 
computer  program  is  changed  from  its  form  at  the  time  of 
documentation . ) 

Error  Message 


(i)  'PSI  DEV  ...  NO  DATA';  PSIDEV  has  been  called  prior  to  a 
call  to  PSI.  The  interpolation  tables  have  not  been 
Initialised . 
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FUNCTION  PSINV(ARG) 

Function 

PSINV  evaluates  the  age  corresponding  to  a  given  value  of 
relative  residual  strength. 

Paraaceter  List 

ARG:  Value  of  relative  strength,  f ,  for  which  age,  £  ,  is 
required  . 

Operation 

The  function  FSOLVE  is  used  to  seek  a  solution  of  the 
equation 

ARG  -  PSI(PSINV).  (5.2?) 


Initial  guesses  for  PSINV  are  found  by  ascertaining  the 
interval  in  the  sequence  of  values  of  ^defining  fKQ)  which 
contains  the  value  of  defined  by  ARG.  This  is  done  by  calling 
INDLOW.  If  this  interval  is  such  that  linear  interpolation  is 
used  to  define  f(p)  then  the  inverse  function  can  be  evaluated 
directly.  Otherwise  FSOLVE  is  used  to  find  the  inverse 
function . 

Note  that  PSI  mus t  be  called  at  least  once  before  PSINV. 


FUNCTION  PSISET (ARG) 


3/S 


Function 


PSISET  re-initial  lses  the  interpolation  tables  used  to 
define  f((i)  following  alteration  of  the  sequence  of  ordered 
pairs  of  ij/  and  (S  by  code  external  to  function  PSI. 

Parameter  List 

ARG:  Value  of  £  for  which  PSISET  will  return  a  value  of  . 
Operation 


PSISET  is  an  entry  point  in  the  function  PSI  and  its 
operation  is  identical  to  that  described  for  the 
initialisation  phase  of  PSI  with  the  exception  that  no  attempt 
is  made  to  redefine  the  strength  decay  function  (R(a))  or  to 
compute  new  values  of  as  stored  in  in  the  array,  PS. 

Common  Variables  Changed 


See  function  PSI. 


FUNCTION  STRFN (ARG) 


Function 

STRFN  evaluates  the  strength  decay  function,  H-R(a). 

Parameter  List 

ARG:  Value  of  crack  length,  a,  for  which  the  strength,  R  is 
required  . 

Operation 

The  first  time  that  STRFN  is  called  the  data  defining*  the 
strength  decay  function  is  input  from  disk  using  the  subroutine 
READFN.  The  file  is  identified  by  the  text  string  in  PNAME  in 
the  COMMON  block  FNAMES . 

After  the  data  from  disk  has  been  transferred  to  local 
storage,  FINTRP  is  called  to  initialise  the  interpolation 
tables  . 

Interpolation  is  effected  using  FINTRP  in  a  conventional 
manner*  If  the  argument,  ARG  ,  is  out  of  range,  STRFN  returns 
the  limit  values  as  defined  by  the  first  or  last  ordered  pairs 
appropriately. 

Storage  Conflict 

Note  that  STRFN  is  normally  used  during  the  initial  phases 
of  NERF  only.  For  this  reason,  the  ordered  pairs  and 
Interpolation  tables  are  stored  in  the  common  block  GCOM  which 
is  used  eventually  to  store  the  loss  factor  interpolation 
tables.  The  strength  decay  function  can  therfore  be  accessed 
only  prior  to  the  first  call  to  the  subroutine  SETTAB  which 
initialises  the  loss  factor  interpolation  table. 

I 

! 
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5.3.3.  Risk  rates 

The  risk  rate  for  structures  of  given  strength  R,  is  given 

by, 

rk(R)  “  ?L(RK1r  (5-28) 


where  P  (R )  is  the  probability  of  load  exceedence.  The 
»  _ 

specifications  for  P^(R)  and  r^CR)  are  given  in  Section  3.2.2. 


The  risk  rates  are  evaluated  by  the  function  RLOAD  which 
uses  cubic  spline  interpolation  to  interpolate  log(r^(R)). 


Note  that  RLOAD(R)  returns  a  risk  rate  that  is  independent 
of  whether  a  stucture  is  cracked  or  uncracked,  (i.e.  k«l  or  k»2 
respectively)  .  It  is  up  to  the  calling  code  to  make  the  correct 
interpretation  . 


A  facility  for  re-establishing  the  interpolation  tables  is 
provide  by  RLOSET. 


FUNCTION  RLOAD ( ARG ) 


m 
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Function 

RLOAD  evaluates  the  local  risk  rate  for  structures  with  a 
given  value  of  R.  Beceause  the  argunent  la  R,  the  risk  rate  Is 
relevant  for  cracked  or  uncracked  structures. 

A  secondary  function,  provided  during  the  first  call  to 

RLOAD  is  to  define  the  limits  for  strength  R  ,  and  R  .  These 

min  max 

are  assumed  by  the  rest  of  the  code  in  NERF  to  be  the  first  and 
last  values  of  the  sequence  of  argument  values  defining  the 
risk  rate  function. 

Parameter  List 

ARG:  Value  of  strength,  R,  for  which  the  risk  rate  is 
required  . 

Operation 

On  initial  entry,  the  sequence  of  ordered  pairs  defining 
Pj^(R)  ia  input  from  the  function  file  identified  by  the  text 
string  in  RNAME.  The  nodal  values  of  (R )  are  converted  to 
values  of  log(r^(R))  before  the  tables  are  initialised. 

The  evaluation  of  rk(R)  for  given  R  is  straightforward. 
After  interpolation  of  the  logarithmic  function,  the 
exponential  of  the  result  Is  taken  to  yield  the  required  risk 
rate  . 

If  R  <R  ( 1 ) ,  r^  ia  set  to  r^Kl)).  If  R>R(M),  (where  M  is  the 
number  of  nodes  in  the  sequence  defining  the  risk  rate 
function),  r^  is  set  to  0. 


FUNCTION  RLOSET (ARG ) 


Function 

RLOSET  re-establishes  the  interpolation  tables  following  a 
re-definition  of  the  ordered  pair  sequence  defining  the  risk 
rate  function. 

Parameter  List 

ARC:  Value  of  R  for  which  a  value  of  the  risk  rate  will  be 
returned  following  re-establishment  of  the 
interpolation  table. 


Operation 

RLOSET  is,  in  fact,  an  entry  point  in  RLOAD  and  commences 
operation  at  the  point  where  RLOAD  has  just  input  the  seqeunce 
of  ordered  pairs  and  calculated  the  values  of  log(rk(R)). 

The  facility  is  provided  to  cope  with  the  requirement  of 

imposing  the  default  limit  equations  for  R  .  and  R  by 

min  max 

SETTAB. 
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5.3.4.  Inspection  removal  and  crack  detection  functions 

The  inspection  removal  and  crack  detection  functions 
were  specified  in  Section  3.2.4.  The  crack  detection  function 
is  defined  by  a  set  of  ordered  pairs  of  crack  length  (a)  and 
Cd(a).  These  data  form  part  of  the  input  data  for  NERF  which 
converts  the  crack  detection  function  to  the  inspection 
removal  function  S^(t)  by  applying  the  equation  (3.30),  i.e., 

Sj^)*V*)  '  1  *  Cd(#(*t))*  (5.29) 

The  nodes  used  to  define  S^O:)  are  the  sane  as  those 
used  to  define  a(t). 


The  function  S  (t)  is  used  to  evaluate  the  modified  density 
J 

for  ,  p^(^),  given  by  equation  (2.55), 

P*({S)  *  P^)  ^,  [SjU0+(P  -  n0)Myt)]J  (5.30)- 

where  r  denotes  the  last  inspection  before  the  current  time,  t. 
The  product  term  in  (5.30)  is  evaluated  by  the  function 
SINSP  so  that  (5.30)  is  replaced  by, 


p^(£)  *  p^)XSINSP(f). 


(5.3D 


The  function  SINSP  is  written  in  the  same  way  as  the 
function  routines  for  the  other  input  functions  in  that 
initialisation  occurs  during  the  the  first  call  to  the  function.  . 
Initialisation  consists  of  reading  the  function  file  for 
C^(a)  and  establishing  a  sequence  of  ordered  pairs  defining 
Sj(t).  The  largest  value  of  a  used  to  define  Cd(a)  is  taken 


as  a  definitiion  for  ad  and  subsequently  for  t^,  via, 

td  *  a_1(ad).  (5.32) 

These  values  for  a.  and  t ,  are  used  by  the  inspection  logic 
a  a 

in  the  usual  way. 

If  a  non  zero  value  has  been  specified  for  ad  prior 
to  the  initial  call  to  SINSP,  then  the  crack  detection  function 
is  ignored  and  the  inspection  procedure  is  assumed  to  be 
perfect. 

T 

i 
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FUNCTION  SINSP (AHG) 


Function 

SINSP  evaluates  the  factor  needed  to  correct  the 
density  function  for  (3  for  the-  effects  of  all  preceding 
inspections. 

Parameter  List 

AEG:  Value  of  ^  for  which  the  factor  is  required. 

Operation 

On  initial  entry,  the  function  is  initialised  by  the 
following  sequence  of  operations, 

(i)  If  CND  is  non  zero,  (i.e.  ad  has  already  been  specified) 
the  logical  variable  SINGLE  is  given  the  value  true 
to  signify  that  the  inspection  removal  function  will 
be  ignored. 

(ii)  The  crack  detection  function  is  read  from  the  functiom 
file  identified  by  the  name  stored  in  DNAME  in  the 
common  block  FKAMES.  Values  of  a  are  stored  in 
CRPD  and  values  of  Cd(a)  are  stored  in  PDFN.  Both 
these  arrays  are  allocated  space  in  the  common  block 
GCOM.  It  is  therefore  essential  that  SINSP  is  called 

at  least  once  before  SETTAB  sets  up  the  loss  factor 
table. 


(ill)  Interpolation  tables  are  initialised  for  C^(a)* 

(iv)  RHD  is  set  to  correspond  to  the  crack  length  given 
by  the  last  node  in  GRPD,  (equation  5.32). 

(v)  Using  interpolation  equation  (5.29)  is  applied  to 

set  up  a  squence  of  ordered  pairs  defining  S  (t). 

J 

The  nodes  correspond  to  the  (3  nodes  used  to  define 

and  are  vignetted  to  lie  in  the  interval^^,  t^j . 
The  t  values  are  stored  in  SBET  and  the  values  of 
Sj(£)  in  SFH.  These  arrays  are  located  in  the  common 
block  DETCOM. 

(vi)  The  interpolation  tables  for  S^.(t)  are  Initialised. 

Following  initialisation,  the  product  term  in  equation 
(5.30)  is  evaluated  if  inspections  precede  the  current  time. 
Otherwise  SINSP  returns  the  value  1. 
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5.3.5.  Penalty  functions 

Although  the  reliability  models  and  input  data  are  defined 
in  terms  of  three  basic  random  variables,  comparative  fatigue 
life,  intitial  crack  length  and  relative  residual  strength 
(X ^ ,  X^  and  respectively),  the  numerical  anaylysis  is  in 
terms  of  the  transformed  random  variables,  virgin  strength, 
age  and  initial  crack  length  (or  initial  age). 

The  evaluation  of  the  density  functions  for  the  transformed 
random  variables  is  handled  by  a  total  of  10  function  routines 
which  have  been  structured  so  that  the  processing  of  the 
transformations  and  the  evaluation  of  the  particular  types  of 
density  functions  have  been  separated.  The  details  of  the 
transformations  are  a  characteristic  of  the  reliability 
modelling  and  will  change  only  when  the  fundamental  modelling 
for  NERF  is  changed.  It  is  far  more  likely  that  the  types  of 
density  functions  will  be  modified  and  with  the  present  program 
structure,  this  can  be  effected  by  changing  only  two  of  the 
density  function  routines. 

The  density  functions  are  defined  for  a  standard  random 
variable  Z,  which  is  related  to  the  basic  random  variables  by 
an  equation  of  the  form, 


Z  -  (X  -  e)/v  (5.33) 

where  v  and  e  are  called  the  location  and  minimum  value 
parameters  respectively.  It  follows  that 

Px(x)  -  pz(  (x-e) /(v-e) ) /(v-e)  .  (5.34-) 


The  relationship  (5.33)  can  generalised  by  introducing  a 
third  random  variable  ?,  related  to  X  by. 
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Y  -  f  X  (5.35  )  - 

g 

where  f  Is  a  scale  factor.  The  density  function  for  Y  is  given 
by, 

PY(y)  •  Pz<<y-fse>/<fsv-fse>)/(fsv'fse)  (5.36) 

-  P£((Y-S)/(vs"es))/(vs‘es) 

where  v  and  e  are  the  scaled  location  and  minimum  value 
s  s  - 

parameters  respectively.  Obviously  the  effect  of  the  scaling 
transformation  can  be  incorporated  within  the  parameters  of 
the  density  function,  rather  than  in  a  transformation  equation 
which  must  be  processed  every  time  the  density  function  is 
eval uated . 

The  standard  density  functions  evaluated  by  NERF  are, 
lognormal,  extreme  value  and  gamma  and  are  given, 
respectively,  by; 

Pz(z)  -  C.exp{-O.5(log(z)/<T)2>  (C  -  1/J*fr<r)  (5-37) 

pz(z)  -  C.zk_1  .exp<-zk>,  (C  -  k)  (5.38) 

p.(z)  -  C.zk_1. exp<-z>.  (C-l/r(k)>  (5.39) 

l* 

These  standard  functions  are  evaluated  by  the  function  PT>F 
which  Incorporates  the  transformation  (5.35)  by  evaluating 

PT(y)  -  C.p2(y-es) /(v8-es) ) 


( 5 .  if  0 ) 
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where  C  now  includes  the.  normalisation  factors 
together  with  the  factor  l/(x3-e3>  in  equation  (5.36). 

The  code  calling  PDF  must  retain  the  Parameters  k, 
l/(v  -e  )  ,  e  and  C,  which  given  the  distribution  type  and  k,  e 

3  S  S 

and  v  can  be  computed  to  initialise  the  density  function.  This 
facility  is  provided  by  the  function  PDFSET. 

The  way  PDF  and  PDFSET  are  used  to  generate  the  desnity 
functions  for  the  transformed  random  variables  is  outlined 
below.  Details  of  the  coding  are  given  in  the  function  routine 
descriptions  which  follow. 

( i)  Density  function  for  virgin  strength.  p^*.) 

Virgin  strength,*.,  is  related  to  relative  residual 
strength  X3  by  equation  (2.29),  i.e., 

•C-  X3Rq  (5.^1  ) 

so  that 

P^U-)  *  Px  (Wl?0)/k0  (5.42) 

-'■'3 

which  corresponds  to  the  transformation  (5. 35)  with 
f  »  Rq.  The  function  p^ ,(•<)  is  evaluated  by  PALPHA  and 
initialised  by  ALPSET. 

(ii)  Density  function  for  ane. 

Age,  (3  ,  is  related  to  relative  fatigue  life, 
and  initial  age,  Hq  by  equation  (2.28),  i.e., 

0  -  t/Xx  +  n0  (5.43) 

so  that  given  n^  and  t, 

“  pX1(t/(?“n0))t/(?"n0)2  (5.44) 


which  can  be  written  in  the  form 


3  30 


33o 


P?(p>  -  Py(l/(J-n0))/(^-n0)2  (5-45) 

where 

X  py(y)  *  Px  (V.t)t.  (5*46) 

P^(y)  is  the  density 

function  returned  by  PDF  fs  *  l/fc» 

The  transformation  from  J  to  p  is  handled  by  the  function 
PBETA  which  evaluates  the  modified  density  P^((S)  which 
incoporates  the  effects  of  the  removal  function  associated 

K 

with  crack  length  inspections. 

PBETA  is  supported  by  the  function  BETSET  which  initialises 
the  density  function  and  BETCNG  which  allows  the  scale 
factor  to  be  set  to  a  new  value  of  1/t. 


( iii) 

The  density  function  for  crack  length  is  defined 
directly  by  the  input  data  as  no  transformation  is 
involved.  The  functions  PRNO  and  RNOSET  provide  for 
evaluation  and  initialisation.  A  third  function, 
RNONRM  allows  for  normalisation  of  the  density  function 
(i.e.  3.33)  via  modificaton  of  the  constant  C  in 

equation  ( 5 . 40 )  • 


Density  function  for  initial  crack  length. 


( iv )  Initialisation  and  range  limiting 


The  three  density  functions  for  the  transformed 
random  variables  are  initialised  by  subroutine  CFIN. 
Each  initialisation  (using  the  appropriate 
inltialsatlon  function)  is  followed  by  an  application 
of  RANGE,  which  is  described  in  Section  4.4.1.  to  find 
the  viable  limits  for  the  random  variable.  For  initial 
crack  length,  an  integration  of  the  density  function 
between  the  limits  (wich  may  be  vignetted  by  those 
specified  in  the  input  data)  is  made  to  obtain  a 
normalising  factor. 
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FUNCTION  ALP SET (K1 , ALP  1 , ALP  2 , ALP  3 ) 

Function 

ALPSET  Initialises  the  density  function  for  virgin 
strength,  ot  ,  given  the  parameters  defining  the  density 
function  for  relative  residual  strength,  X^. 

Parameter  List 

Kl:  Integer  defining  the  type  of  density  function  (see 
PDF)  . 

ALP1:  Dispersion  parameter  for  X^ . 

ALP2:  Lower  limit  parameter  for  X^. 

ALP3:  Location  parameter  for  X^ • 

Operation 

The  transformation  from  X3  to  at  involves  the  use  of  the 
scale  factor  Rg ,  which  is  stored  in  RMUO  In  the  COMMON  block 
RMUO. 

A  heading  is  output  on  the  primary  output  file  so  that 
information  produced  by  PDFSET  can  be  correctly  identified. 
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FUNCTION  BETCNG (RNS V) 

Function 

BETCNG  allows  the  scale  factor  used  for  the  evaluation  of 
P»<?)  to  be  changed,  according  to  the  time  value  stored  in 
RNSVIN. 

Parameter  List 

RNSVIN:  Value  of  t  which  is  to  be  used  to  set  a  new  scale 
factor . 

Operation 


PDFSET  is  used  to  re-initial ise  the  density  function  p.y(y) 
which  used  to  generate  Pf(£)  in  PBETA. 

If  the  scale  factor  is  changed,  the  viable  limits  for  0  will 
also  change.  Rather  than  call  RANGE  every  time  that  a  new  tire 
value  is  used,  the  limits  are  calculated  approximately  by 
multiplying  the  original  estimates  (produced  with  t«l  )  by  t. 
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FUNCTION  3£TS3T( K1 , 33T1 , 3ET2, 3ET3 ) 

Function 

BHTS2T  initialises  the  density  function  for  age,  / 3 ,  given  parameters 
defining  the  density  function  for  relative  fatigue  life,  X^. 

Parameter  Li3t 

K1:  Integer  identifying  the  type  of  density  function  (see  PDF). 

BLT1 :  Dispersion  parameter  for  ^ • 

3ET2:  Lower  Limit  parameter  for  X^ 

B2T3i  Location  parameter  for  X^. 

Operation 

The  density  function  is  initialised  with  t=1  so  that  no  scale  factor 
is  involved.  This  ensures  that  the  limits  which  are  computed  following  the 
first  call  to  BFTSET  can  be  used  by  B2TCNG  to  compute  approximate  limits  for 
other  values  of  t. 

Note  that  output  to  the  primary  output  file  is  suppressed  following  the 
first  call  to  BSTSET. 


FUNCTION  PALPHA(ARG) 


Function 

PALPHA  evaluates  the  density  function  for  virgin  strength, 
oc  . 

Parameter  List 

ARG:  Value  of  for  which  the  density  function  is  to  be 
evaluated . 

Operation 

PALPHA  makes  direct  use  of  the  function  PDF  to  evaluate  the 


density  which  is  assumed  to  be  initialsed  by  a  previous  call  to 
ALPSET  so  that  the  appropriate  constant  are  available. 
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FUNCTION  PBETA(ARG) 

Function 

it 

PBETA  evaluates  p^(p),  the  density  function  for  age. 
Parameter  List 

ARG:  Value  of  §  for  which  the  evaluation  of  the  density 
function  is  required. 

Operation 

PBETA  accesses  RNO  In  the  COMMON  block  PARCOM  to  compute  the 
value  of  Y  where, 

Y  -  l/($-nQ)  -  1  /  ( ARG-RN  0 )  (5.47) 

which  Is  passed  Into  PDF  to  compute  p^(y).  The  required 
density  for  ^  is  then  given  by, 

P^($)  -  y2p^(y)  x  SjU0-»  ($-  n0)ti^/t) 

-  ARG l * ARG 1 *PDF (KBET , C 1 , C  2 , C  3 , C  4 , ARG 1 ) *SINSP(  AEG ) 

...  (5.48) 

The  value  of  f  -Hq  must,  of  course,  be  non-zero.  An  error 
message  is  produced  if  this  condition  is  violated. 

Error  Message 

(1)  'PBETA  ...  ARG  IS  ZERO':  PBETA  has  been  called  for 
conditions  leading  to  f)  -nQ*0.  Further  processing  is 
terminated . 
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FUNCTION  PDF(R,C1,C2,C3,C4,ARG) 

Function 

PDF  evaluates  a  probability  density  function,  identified  by 
the  first  5  parameters  in  the  call,  for  the  value  ARG  of  the 
random  varaible  X. 

Parameter  List 

K:  Integer  identifying  the  type  of  distribution. 

■Is  Lognormal 
■2:  Extreme  value 
■2:  Gamma 

Cls  Dispersion  Constant. 

C2:  Scaled  minimum  limit. 

C3:  Reciprocal  of  scaled  loacation  parameter. 

C4:  Constant  incorporating  the  effects  of  normalisation 
and  scaling. 

ARG:  Value  of  the  random  variable  for  which  the  density 
function  is  to  be  evaluated. 

Operation 

It  assumed  (but  in  no  way  checked)  that  prior  to  calling 
PDF,  PDFSET  has  been  called  to  calculate  the  constants  Cl,  C2, 
C3  and  C4  which  are  stored  by  the  calling  code  to  define  the 
density  function. 

The  value,  ARG,  of  the  random  variable  X  is  converted  by  PDF 
to  a  standard  random  variable,  £  say  where 

Z  -  (ARG-C 2 ) *C3 .  (5.49) 


'll 
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The  density  function  for  X  can  be  evaluated  using  a  standard 
density  function  for  Z  as  described  in  Section  5.3.4. 
Currently,  PDF  recognises  three  standard  distributions. 

( i )  lognormal 

Px(x)  -  pz  ( z) /(  f  S(V- -O 

-  exp{-0 . 5*(log(  z)  /<r)  2}/(fsv'Jiir<r  z) 

-  C  4*EXP  1 < — 0 . 5 * ( ALOG (Z) /Cl)**2)/Z  (5. 50) 


( ii )  Extreme  Value 


Px(x)  »  k*z^""^exp{  >  /  (fg(v/-£-)) 

A*- 

-  C4*T1*EXP1(-T1)/Z  (5.51) 

where 

T1  -  zk  -  Z**C1.  (5.52) 


(iii)  Gamma 


p  x ( x )  ■  zk“1exp{-i) 

-  C4*(Z**(C1-1.0)*EXP1 (-Z)  .  (5.53) 
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FUNCTION  PDF  S  ET  (K  ..FACT  ,CIN1,CIN2,CIN3,C1,C2,C3,C4,  IOUT  ) 
Function 

PDFSET  initialises  a  probability  density  function  by 
calculating  constants  that  can  be  used  by  PDF  to  generate  the 
required  function  using  standard  density  functions. 

Parameter  List 

K:  Integer  identifying  the  type  of  density  function. 
al:  Lognormal 
"2:  Extreme  value 
*3:  Gamma 

FACT:  Scale  factor  for  the  random  variable  X. 

CIS  1 :  Dispersion  constant,  defined  in  terms  of  X. 

CIN2:  Minimum  value,  defined  in  terms  of  X. 

CIN3:  Location  parameter,  defined  in  terms  of  X. 

Cl:  Dispersion  parameter  for  Z  (Returned  by  PDFSET). 

C2:  Scaled  minimum  value  (Returned  by  PDFSET). 

C3:  Reciprocal  of  scaled  location  parameter (Returned  by 
PDFSET) . 

C4:  Constant  incorporating  the  effects  of  scaling  and 
normalisation.  (Returned  by  PDFSET) 

IOUT:  Integer  defining  output  mode. 

■0:  Write  information  about  the  density  function  on 
the  primary  output  file  (Logical  unit  3). 

■1:  Don't  write  the  information. 
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Operation 

The  first  section  of  code  in  PDFSET  calculates  the  constants 
Cl,  C2  and  C3  according  to  the  equations 

Cl  -  CItfl  -  k  (5.5  4) 

C2  -  ef  -  CIN2*FACT  (5.55) 

3 

C 3  -  l/(fa(v  -e  )) 

-  1.0/(CIN3*FACT-C2)  (5.56) 


The  remainder  of  the  operations  are  specialised  according  to 
the  type  of  density  function  being  initialised. 

(i)  Lognormal 

For  the  lognormal  density  it  is  assumed  that  the 
dispersion  parameter,  k,  has  been  specified  in  terms  of 
logarithms  to  the  base  10.  Conversion  to  natural 
logarithms  is  effected  by  multiplying  CIN  1  by 
1.0 /log  j  q ( e)  . 

The  normal  slat  ion  constant  is  given  by 

C4  -  ( 1 .  O/Jlii')  *  (l/(v-e))/k 

s  s 

-  C3*C0N/C1  (5.57) 

(ii )  Extreme  value 

.  For  the  extreme  value  density  function,  the  only 

specialised  operation  is  the  calculation  of  C4,  which 
is  given  by 


3  4  0 


3*-0 


C 4  »  k/(v  -e  ) 
s  s 

-  C 1  *C3. 


( 5 . 5*8  ) 


(ill)  Gamma 

The  normalisation  constant  for  the  gamma  density 
function  involves  the  evaluation  of  P(k).  This 
evaluation  is  made  via  the  function  S14AAF  from  the  NAG 
library  of  scientific  subroutines.  (This  is  the  only 
function  which  is  not  supplied  as  part  of  the  NERF 
program.)  Once  this  function  has  been  evaluated  and 
stored  in  GAM  the  normalisation  constant  is  given  by 

C4  -  (1 /p(k) ) . (1 /(v  -e  ) 

8  3 

-  C3/GAM.  (5.59) 


Note  that  provisiion  has  been  made  for  the  trapping 
of  error  codes  returned  by  S14AAF  and  that  the  Gamma 
function  is  evaluated  only  when  CINI  changes. 

•  In  each  case  appropriate  information  regarding  the  density 
function  that  has  been  initialised  is  transmitted  to  the 
primary  output  file.  If  IOUT-1,  this  output  is  suppressed. 

Error  Message 

(i)  'ERROR  IN  GAMMA  FUNCTION,  IFAIL  -  a****':  The  gamma 
function  routine  supplied  by  the  NAG  library  has 
failed.  For  interpretation  of  the  error  code  refer  to 
the  appropriate  NAG  documentation. 


FUNCTION  PRNO(ARG) 


Func t  ion 

PRNO  evaluates  the  density  function  for  initial  crack 
length,  aQ. 

Parameter  List 

ARG:  Value  of  a^  for  which  the  evaluation  is  required. 
Operation 

As  no  transformations  are  involved,  the  evaluation  of 
p  (an)  is  made  by  a  straightforward  call  to  the  function  PDF. 
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FUNCTION  RN ONRM ( FACT  ) 

Function 

RNONRM  modifies  the  constant  C4  used  to  evaluate  pa  (sq)  to 

include  the  effect  of  a  normalising  factor  produced  by  the 
calling  code. 

Parameter  List 

FACT:  Normalising  factor. 

Operation 

RNONRM  effects  the  modification  by  changing  the  constant  C4 
which  has  been  previously  computed  by  PDFSET. 
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FUNCTION  RNOSET (K1 , A  1 , A 2 , A 3 ) 

Fun  c  t i on 

RNOSET  initialsies  the  density  function  for  Initial  crack 
length,  aQ. 

Parameter  Li3t 

K1 :  Integer  defining  the  type  of  density  function  (see 
PDF)  . 

Als  Dispersion  parameter  for  a^. 

A2:  Minimum  value  parameter  for  ag. 

A3:  Location  parameter  for  a^. 

Operation 

There  are  no  transformations  involved.  The  density  in 
initialised  by  a  straightforward  call  to  PDFSET. 


3 


5.4.  The  Evaluation  of  the  Loss  Factor 

The  reliability  expressions  involve  the  evaluation  of  the 
loss  factor  term,  H  (* ,  (I  ,nQ  ,  t )  ,  which  is  defined,  for  cracked 
structures,  by  equations  (2.45)  and  (2.44)  for  initial 
cracking  and  no  initial  cracking  respectively.  Both  equations 
involve  an  Integration  over  £ :  because  the  loss  factor  appears 
in  the  innermost  integration  of  each  reliability  function 
considerable  savings  in  computational  effort  can  be  made  if  an 
interpolation  table  can  be  employed  to  bypass  the  integration 
step. 

In  many  practical  calculations,  the  loss  factor  term  is  very 
close  to  1.0,  (which  provided  the  original  motivation  for  the 
option  for  neglecting  the  term  altogether,  see  Section  3.6.3) 
and  the  expense  of  using  full  integrations  for  every  evaluation 
is  not  justified.  The  Interpolation  procedures  described  in 
this  section  provide  a  good  compromise  between  accuracy  and 
computational  effort. 

Although  the  loss  factor  is  time  dependent,  indicating  that 
an  interpolation  table  may  require  initialisation  for  each 
value  of  time,  it' is  possible  to  separate  the  time  dependence 
from  an  integral  term  which*  may  be  represented  by  an 
Interpolation  table  which  is  valid  for  the  whole  run  through 
the  time  sequence.  Moreover,  it  Is  possible  to  remove  the 
dependence  on  ng  from  the  table  which  means  that  a  given 
Interpolation  table  may  be  used  for  a  wide  range  of 
calculations  using  the  same  residual  strength  and  probability 
of  load  exceedence  functions. 

The  separation  of  the  time  dependence  is  effected  by  writing 
the  loss  factor  in  the  form, 

H(*,$,n0,t)  -  exp{-t.G{*,p,ng) >  (5.60) 


where,  for  the  initial  cracking  class. 


o 
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i  f ^ 

+  "  Tno  r2(^P')d(®' 

r  U, 

and  for  the  no  initial  cracking  class, 

ft 

G(*,p,0)  «  r2(*,p')dp'  +  r^oOtJ. 


(5.6l) 


(5. 62) 


The  dependence  on  n.  is  separated  by  defining 


G  (*,0)  - 


ft 

L  r2(et’P' 

J<i 


(S  )d(3'  +  [  t”t .  r  x  (*l  )  ]  (5.63) 


so  that 


G( 


*’M0>  "  -  G*(ct,n  )J  . 


(5.64) 


The  term  in  square  brackets  in  (5.63)  is  included  only  when 
n0-°,  for  which  case  G  (rf,nQ)  in  (5.64)  is  zero.  With  these 
conventions,  equations  (5.63)  and  (5.64)  are  valid  for  all 
classes  of  models. 

For  uncracked  structures,  the  loss  factor  is  given  by 

H(*,p,n0,t)  -  exp{-ri(«t)t>.  (5.65) 

No  integration  is  required  and  the  term  can  be  evaluated  either 
directly  within  the  code  which  evaluates  the  reliability 
functions,  or  as  a  special  case  of  the  code  used  to  evaluate 
G(«<,p,ng).  The  latter  facility  is  provided  within  the  function 
GVAL,  described  below,  although  there  are  some  Instances  in  the 
NERF  code  where  the  loss  factor  term  for  uncracked  structures 
is  evaluated  directly.  This  special  case  is  identified  by  GVAL 
if  Hq-0  and  p  •  0. 

Another  special  case  occurs  in  the  initial  cracking  model 
when  $ “Hq  “  0.  Considering  the  expression  for  G(«,p,nQ)  in 
(5.61) 


3  IfS 


lim  G  («t,  (J,nQ) 

«• 


lim  f  r,  («t,  (S'  )  dfl' 
p-->n0 


li»  <*-nQ) 


lim  r,  (*,  fi  ) 


lim  1 

(by  L'Hospital's  rule) 


“  "q) •  (5.46) 


The  various  forms  for  G(«,|S,n0),  in  terms  of  G*(*e,p)  are 
listed  In  Table  5.5. 

Note  that  the  special  case  Oq"0,  p«0  and  t^»0  reduces  to 
either  ^te^n^)  or  r^(«*)  depending  on  the  class  of  model.  The 
convention  of  assuming  that  f -0  Identifies  the  no  Initial 
cracking  class  is  made  by  GVAL.  (By  setting  ^  to  be  at  least 
t,  where  C  is  a  very  small  number.  In  PSI  ensures  that  GVAL  will 
never  be  called  with  (J  "0  for  a  cracked  structure). 

The  loss  factor  evaluation  is  thus  based  on  the  use  of  a 
single  function  called  GVAL  which  is  described  below.  A  value 
of  the  loss  factor,  H(«£,p,nQ,t)  is  obtained  via, 

H(«C,J,n0,t)  -  EXP  1  (-RNS  V*GVAL  (ALPV.BETV))  . 


“  lim 

f 


H* 

J.  f'xp' 


(5.47) 
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The  exception  to  this  is  when  an  evaluation  of  1-H  ,n^  ,t)  is 

-A  - 

required  and  GVAL(*,^,nQ)  is  very  small,  (<  10  say).  In  this 
case,  the  series  approximation  to  the  exponential  function  is 
used  to  yield 

1-H(«t,|l,n0,t)  -  RNSV*GVAL  (ALPV , BETV)  ,  (5.68) 

as  used,  for  example,  in  FALP. 

The  function  G*(«c,(J)  is  interpolated  in  (*»p)  space  by 

tabulating  values  of  log(G  (*,$))  and,  generally,  using 

* 

bilinear  interpolation  to  yield  log(G  («,£))  for  Intermediate 
values  of  and  (S  .  Special  interpolation  procedures  are 
required  near  some  of  the  boundaries  of  the  interpolation 
region. 

The  function  GVAL  is  described  below.  The  structure  of  the 
interpolation  table  and  the  methods  of  initialisation  and 
Interpolation  are  described  in  subsequent  sections. 
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FUNCTION  GVAL (ALPV.BETV) 

Function 

GVAL  returns  the  value  of  the  funtion  G(«*,£,ng)  for  given 
values  of  «C,(5  and  nQ  (which  is  set  in  COMMON).  The  function 
G(*f,fl,ng)  is  used  to  evaluate  the  loss  factor, 

H  ,nQ  ,t)  -  ex  p{  -  t.G(«/,|S  ,nQ>  >  (5.  (,9) 

Parameter  List 

ALPV:  Value  of  U  for  which  the  evaluation  is  required. 

BETV:  Value  of  p  for  which  the  evaluation  is  required. 

Operation 


The  function  GVAL  is  primarily  concerned  with  selecting  the 
special  cases  according  to  Table  5.8.  The  code  is  a 
straightforward  implementation  of  this  Table. 

The  function  GSTAR  is  used  to  obtain  values  of  G*(«i,p)  via 


interpolation 


3  so 
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5.4.1.  Structure  of  the  Interpolation  Table 

The  limits  of  integration  for  the  double  integral  terms  in 
pp(t,ng)  and  p^tt.ng)  for  the  moat  general  model  (equations 
(3.93)  and  (3.96)  respectively)  define  the  maximum  possible 
ranges  for  «£  and  $  .  These  limits  are, 

u  (“o1?*  -  *  - 

Allowing  for  all  possible  values  of  nQ  and  neglecting  the 
inspection  boundaries,  the  loss  factor  interpolation  table  is 
required  to  span  a  space  defined  by 

t±<p<t{  (5.12) 

and 

max{*min’RminW)}  ±  ±  aln{*«.x  ^max'f' C  f] >  }  (5*73) 


(5.10) 

(5.11) 


The  nodal  values  of  «<  and  /I  at  which  the  values  of  G  («r,(f) 
are  computed  are  arranged  so  that  all  the  nodes  fall  within  the 
confines  of  the  region  of  (*,Q)  space,  defined  above,  according 
to  the  following  system. 

The  f  values  are  set  by  the  nodal  values  of  together 

with  the  values,  f 1  (RBax /«..,) .  fl  (RBln/*«ln>  ™d 

u/^R  .  /R  )  if  they  lie  within  the  interval,  (t.  ,'?.).  Along 

r  atm  otx  x  i 

each  line,  K- values  are  distributed  according  to 
following  strategy.  For  the  given  value  of  f,  say,  arranges 
from  to  where, 

*21  *  J»i  <5-15> 


jr/ 
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The  function  G  (w,(3)  can  be  discontinuous  across  the  line 

oC  -  R  .Because  of  this,  this  value  of  at  is  also  included  as  a 
max 

nodal  value  on  each  $  line.  Note  that  the  default  limits  for  "t ^ 

and  tfj ,  (equations  (3.45)  and  (3.46)),  ensure  that 

<  Rmax  <  thereby  defining  two  subintervals 

[ol,  .  ,R  ]  and  [R  In  each  subinterval,  the  X  nodes 

i  j  max  max  Zj 

are  distributed  uniformly  with  K^+l  alpha  values  in  the  first 
subinterval  and  K^  +  l  values  in  the  second.  The  numbers  and 
are  set  so  that. 


K1 

-  (R  -  et'  )/(*'  -  ot',  )  *  (K,  .  -1) 

max  min  max  min  lim 

(5.76) 

and 

K2 

"  Klim  ”  K1  *  l' 

(5.77) 

where 

rfmin 

-  min  {  oL  .  .  } 

j  lj 

(5.78) 

and 

max 

-  max  {  ot  ,  .  > 

J  2J 

(5.79) 

Geometrically,  this  generates  a  non-or thogonal 

interpolation  mesh  of  the  form  shown  in  Figure  5. 11.  The  mesh 

satisfactorily  follows  boundary  curves  across  which  the  * 
* 

function  G  (rt,p)  can  be  discontinuous.  In  the  mesh  shown  in 
Figure  5.11  there  are  two  points  at  which  the  mesh  lines 
converge.  Such  points  cause  no  difficulty  during 
interpolation:  the  table  simply  contains  several  identical 
entries  representing  the  same  point  but  different  mesh  lines 
and  since  inverse  interpolation  is  not  required,  the 
degeneracy  can  be  easily  handled.  In  general,  there  are  three 
such  points  corresponding  to  the  following  conditions. 


R  , 
max ' 


V 


-i 


f-  r  (R»in/R».x>} 


(5.80) 


X-  ■  R 


(5.81) 


Figure  5.11  Construction  of  a  typical  loss  factor  interpolatio 
mesh.  The  mesh  is  constructed  using  the  N  nodes 
infused  to  define  f(f).  The  «c  nodes  have  "been 
selected  according  to  the  strategy  described  in 
the  text;  for  simplicity  and  Kg  have  both 
been  set  to  with  9. 


OL  -  oL 


3SS 


fi  -  u/~l  (R  /oC  ) 
”  r  min  max 


( 5  .8  2  ) 


The  definition  of  the  mesh  may  he  considered  in  terms  of  a 
mapping  from  the  variables  at ,  (2  to  two  mesh  variables  RK,RJ 
where  RK  and  RJ  have  values  in  the  intervals  [  1 ,  K,  ]  and  [1,N] 
respectively.  (N  is  the  number  of  nodes  in  the  sequence  of 
ordered  pairs  defining  <^(&)»  including  the  three  special 
values  defined  above  and  inserted  by  SETTAB.)  In  the  mesh 
defined  above,  lines  of  constant  RJ  correspond  to  lines  of 
constant  (!.  If  lies  in  the  interval  j  •  Pj+j.  >  *  is  8iv«n  by 

RJ  -  (?  -  f +  i  -fj)*  (5.83) 


Conversely,  0  is  given  by 


P  -  Pj  +  <Pj+i  - 


(5-84) 


The  relationship  between  a c  and  RK  is  a  little  more  complex. 
Given  K^  and  K2,  it  is  clear  that  for  all  (i  ,  the  line 
RK  ■  K^  +  1  corresponds  to  the  line 


«<-  ■  •  max{«c  .  ,min{R  ,  <  }}, 

sep  min  max  max 


(5.85) 


Hence,  given  (at, (3),  RK  can  be  computed  via  the  following  steps 


(i)  Compute  *lQW  -  nax(atmln,Rnin/^(p)> 


and  *high  "  nin<#tmax*Rmax/r/(?)}' 


(ii)  If  *  >  «t  ; 

sep 


(5.86) 


(5.87) 


(5.88) 
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10+. 

where  et{  ■  max{«4  ,  «C,  }.  (5.89) 

low  sep  low 

(ill)  If  oi  <  R  5 
max 

RK  -  1  +  (oi  -  W,  )/U  -  at.  )  *K .  .  (5.90) 

low  sep  low  1 

In  (li),  if  I**-..  .  -  l  <£,  RK  is  arbitarily  sec  to  K.+l. 

nig  n  set)*  i 

In  (iii),  if  |«^sep  -  ^lowi  -<^»  18  arbitarily  set  to  Kj+1. 

Conversely,  given  RK,  at  can  be  computed  via  the  following 
steps . 

(i)  Compute  "tlow.  **high  88  ln  (*•)  above. 

(ii)  If  RK  >  K1+l; 

*  “  Ulow  +  (*Siigh 

(iii)  If  RK  <  K^+l ; 

*  -  «4,  +  (*  -  <  )  .{RK  -  1)/K.  +  .  (5. 92) 

low  sep  low  1  low 


the  above  equations  completely  specify  the  transformation. 
Note  that  constant  RK  lines  do  not  necessarily  map  into 
straight  lines  in  space,  but  follow  curves  dictated  by 


A  typical  interpolation  mesh  generated  by  this  logic 
is  shown  in  Figure  5. 12. 
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FUNCTION  ALPTAB ( RK, ALPLOW , ALPH IG  ) 

Function 

ALPTAB  returns  a  value  of  «L  corrspondlng  to  RK  for  the  £line 
denoted  by  ALPLOW,  ALPHIG  where 

ALPLOW  -  maxfe^.R (5.93) 

ALPHIG  «  min{-d  ,R  /V(/S)>.  (5. 94) 

max  max  1  ' 


Parameter  List 

RK:  Value  of  RK  for  which  the  value  is  required. 
ALPLOW:  Lower  limit  for  on  the  line. 

ALPHIG:  Upper  limit  for  <  on  the  £  line. 

Operation 

Broadly,  ALPTAB  executes  the  transformation  defined  by 

equations  (5.91)  and  (5.92)  where  (5.86)  and  (5.87)  have  been 
set  by  the  calling  code  to  produce  ALPLOW  and  ALPHIG. 

Using  the  notation  of  Section  5.4.1,  ALPTAB  assumes  that  the 
following  constants  have  been  set. 

RK1  -  KL  +  1  ;  K1  -  K  +1  (5.95) 

ALPSEP  -  AMAX1 (ALPL, AMIN  1 (ALPH, R(M) )  (5.96) 

where 

ALPL  ""min  (5'97> 

and 

ALPH  -  a£aJ|.  (5.98) 


Z£"f 

RK1M1  -  Kl 
RKLM1  -  K2. 


in 

(5. *19) 

(5.  100) 


Then  if  RK<K1,  u.  is  given  by  equation  (5.92),  i.e., 

ALPTAB  -  ALPLOW  +  (ALPSEP  -  ALPLOW) * (RK-1 . 0 ) /RKLIM1 .  (5.101) 


If  RK>Kl,  nC is  given  by  equation  (5.91),  i.e., 

ALPTAB  -  ALPL2  +  (ALPRIG  -  ALPL  2  )  *  (RK-RK1  ) /RKLM1  (5.102) 


where 


ALPL  2 


max( ALPLOW, ALPSEP} 


(5.  103) 


z  s’  s 


35-3 


FUNCTION  INITAB (DUM) 

Function 

Function  INITAB  Initialises  the  constants  required  by 
functions  ALPTAB  and  RKTAB.  No  function  value  is  returned. 

Parameter  List 

DUM:  Dummy  parameter.  (The  dummy  parameter  Is  required 
because  INITAB  is  an  entry  point  In  the  function 
ALPTAB.  In  an  instalation  where  entry  points  are  not 
permitted  INITAB  could  be  rewritten  as  a  subrotuine.) 

Operation 

Given  the  constant  KLIM  (K^^),  the  number  of  K  nodes,  the 
following  operations  are  performed  by  INITAB. 


(1)  Compute  ^in  “  ®in  (^(j))  *  ALPL .  (5.104) 

4 

(11)  Compute  m  «ax  («t2  ( j )  )  ■  ALPH .  (5.105) 

(ill)  Compute  *int  -  (^ax  -^in)/(Klim-D  (5.106) 

(iv)  Set  ALPSEP  -  *  -  R  .  (5.10?) 

sep  max 


(This  value  may  be  overwritten  below.) 

(v)  Calculate  K1 ; 

If  *  <  <  ,  ;  Kl-1,  (K  -0).  (5.108) 

sep  —  min  1 

If  >  •*-  ;  Kl-KLIM+1,  (K.-K,.  ).  (5.109) 

sep  —  max  1  11m  '' 


Otherwise,  in  accordance  with  equation  (5.76) 


3*9 


3r? 


K1  -  integ((^gep  -  ^low)/atint)  +1. 

-  IF  I X  (  (ALPS  E  P  -  ALPD/ALPINT  +  1.  (5.110) 


(vi)  Set  the  following, 

RK1  -  K1  -  Kl+1  (5.1  11) 

ALPSEP  -^3ep  -  <n«<^l0W,-nia{^high,Rmax}>  (5.112) 

RK1M1  -  Kx  -  Kl-1  (5.113) 

RKLMl  -  K2  -  RKLIM-K1  (5.114) 

TEST  -  EPS  2*ALPSEP  (5.115) 


where  EPS 2  is  a  small  number  close  to  machine  accuracy.  (Test 

v  is  used  to  trap  cases  where  oisot  in  RKTAB .)  If  K  .  -K.  +l, 

r  sep  1  11m 

,  X-  *  0  and  K  ,  is  incremented  by  1  to  prevent  ALPTAB  from 

v  Z  1 

entering  the  section  of  code  associated  with  the o4  nodes  having 

«4greater  than 

°  sep 


36£> 


34o 


t 


FUNCTION  RKTAB (ALPVAL, ALPLOW, ALPHIG ) 

Function 

RKTAB  returns  the  value  of  RK  corresponding  to  for  the 
line  denoted  by  ALPLOW,  ALPHIG  where 

ALPLOW  -  (5.116) 

ALPHIG  -  n.in{^max,RmaxY((S)>.  (5.117) 

Parameter  List 

ALPVAL:  Value  of  for  which  RK  is  required. 

ALPLOW:  Minimum  value  of  at  for  the  £  line. 

ALPHIG:  maximum  value  of  •&  for  the  £  line. 

Operation 

Broadly,  RKTAB  executes  the  sequence  of  operations 
described  by  equations  (5.88)  to  (5.9  0). 

Using  the  notation  of  Section  5.4.1,  RKTAB  assumes  that  the 
following  constants  have  been  initialised. 


RK1  -  KL  +  1,  (5.118) 

ALPSEP  -  max(otlow,min{o^^g  h  ,Rfflax  )  )  (5.119) 

RKL1M1  -  Kt  (5.120) 

RKLM1  -  K2.  (5.121) 


Then  if  «<  <  *4sep»  RK  is  given  by  equation  (5.88), 


RK  -  1  +  (ALPVAL  -  ALPLOW) /(ALPSEP  -  ALPLOW) *RK1M1 .  (5.122) 


36! 

If  U.  >  oC  ,  RK  is  given  by  equation  (5.84), 

—  s  e  p 

RK  -  RK1  +  ( ALPVAI  -  ALPL 2 ) / ( ALPRIG  -  ALPL 2 ) *RKLM 1 ,  (5.123) 

where 

ALPL  2  -  AMAX1 (ALPSEP.ALPLOW)  •  .  (5.124) 


36/ 


If  the  denominator  in  either  expression  is  nearly  zero,  RK 
RK1  is  returned  . 
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5.4.2.  Initialisation 

The  loss  factor  interpolation  table  is  initialised  by 
subroutine  SETTAB  which  was  partially  documented  in  Section 
5.2.1.  This  description  of  the  initialisation  of  the  loss 
factor  completes  the  documentation  for  that  subroutine. 

The  first  operation  associated  with  the  loss  factor 
interpolation  table  is  the  calculation  of  the  e&  limit  arrays 
which  contain  the  limls  and  («<l'*ations  (5.14)  and 

(5.15)  respectively)  for  each  value  of  ^  in  the  sequence  of 
ordered  pairs  defining  • 

Following  the  calcluation  of  these  arrays,  the  number  of 
intervals  in  d ,  Is  set  according  to  the  space  available 

in  the  G  array  in  COMMON  block  GCOM.  Currently,  is  set  to 

the  minimum  of  33  or  2500/N  where  N  is  the  number  of  (Sj  values. 

The  table  is  initialised  by  the  nested  DO  LOOPS  terminating 
in  statements  140  and  150.  They  sweep  through  the  values  of 
and  ot  values  corresponding  to  the  mesh  nodes  of  the 
interpolation  grid  described  in  Section  5.4.1.  (Note  the  use 
of  ALPTAB  to  effect  the  mapping  from  integer  values  of  K  to«r  .) 

The  table,  as  stored  on  disk,  contains  values  of  the  term. 


so  that  the  table  is  independent  of  the  parameter  lr  and  the 
state  of  the  VIRGIN  switch.  Accordingly,  the  VIRGIN  switch  is 
cancelled  and  value  returned  by  RINTV  divided  by  lr«  On 
completion  of  the  table  Initialisation  the  VIRGIN  switch  is 
restored  to  its  proper  value.  The  logarithm  is  taken  by  the 
function  L0G1  which  ensures  that  a  zero  argument  value  results 
in  a  known  value  of  -80.0  for  the  logarithm.  This  fact  is  used 
by  subsequent  code  to  detect  mesh  points  where  the  integral 
term  is  zero. 
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Once  these  table  values  have  been  calculated  or  read  from  a 
disk  file,  they  are  updated  to  Include  the  factor  1^  and  the 
term  r^Cod)^,  If  required.  This  Is  done  by  the  DO  LOOPS 
terminating  at  statements  250  and  260. 

SETTAB  provides  for  the  construction  of  contour  maps  of  the 
'G  integral'  as  written  to  disk  or  the  'G  function' 
(G(«*,(S,ng))  .  The  latter  is  computed  in  an  obvious  wav  by  the-  DO 
LOOPS  terminating  at  statements  280  and  310. 


The  subroutine  NODES  and  the  functions  RINTV  and  RLGAM  which 
are  used  to  evaluate  the  table  entries  are  described  below. 
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SOBROUTINE  NODES (GAMMA, IK) 

Function 

NODES  determines  Che  limits  of  integration  and  the  nodal 
valaues  of  £  for  the  integration  term, 
rt 

Term-  l  r2  )  if '  •  (5.125) 

64 

Parameter  List 

GAMMA:  Array  into  which  the  nodal  values  of  £  are  returned  to 
the  calling  code.  (The  limits  of  integration  are 
returned  as  GAMMA ( 1 )  and  GAMMA (IK)  . ) 

IK:  On  entry,  the  number  of  storage  locations  available  in 
GAMMA. 

On  exit,  the  number  of  nodes  placed  in  GAMMA.  If  IK-0, 
the  integral  term  la  zero. 

Operation 

The  nodes  for  g  correspond  with  the  f  values  used  to  define 
)  and  the  equivalents  of  the  Rvalues  used  to  define  r2(R). 
The  nodal  values  for  <f7(f)  are  stored  in  the  array  BETA  in  the 
COMMON  block  PSICOM.  The  second  set  is  obtained  frc.m  the  R 
nodes  stored  in  the  array  R  in  the  COMMON  block  LOADCM  via  the 
relationship , 

f  -f  1  (R /at) 

-  PSINV(R(I)/ALPV)  .  (5.126) 

The  limits  of  integration  are  defned  by, 

max{ti,YTl(Rn#x/<>  <  |J'<  min{£  ,  f 1  *  (5.127) 

The  required  sequence  of  ^  values  is  produced  by  merging  these 


v 

! 
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two  sequences  subject  to  the  vignetting  specified  by  equation 
(5.117),  using  the  subroutine  MERGE. 

Note  that  if  R  ,  the  integral  term  is  zero  and  a 

*  —  max 

value  of  0  is  returned  for  IK. 

COMMON  Variables  Changed 
ALPV:  Current  value  of  *. 

BETV:  Current  value  of  £ . 


FUNCTION  RINTV (ALPV1,BETV1 ) 

Function 

RINTV  returns  the  value  of  the  term, 


RINTV  -  r2Uf(  |5' ))dp'  +  (5.128) 

for  given  values  of  «<  and  (1  •  The  term  in  square  brackets  is 
included  only  if  the  VIRGIN  switch  is  on. 

Parameter  List 

ALPV1:  Value  of  *  for  which  the  evaluation  is  required. 
BETV1:  Value  of  ^  for  which  the  evaluation  is  reuqired. 


Operation 


After  setting  the  current  values  of  ALPV  and  BETV  in  the 
COMMON  block  PARCOM,  subroutine  NODES  is  called  to  ascertain 
the  limits  of  integration  and  the  nodal  values  of  p'  to  which 
the  Integration  procedure  is  to  be  locked.  (See  NODES  for 
details.).  The  adaptive  Integration  routine  ADAPT2  is  used  to 
evaluate  the  Integral  term. 


Note  that  this  function  can  be  used,  if  required  to  replace 
the  Interpolation  procedure  for  evaluating  the  function 
G*(«c,£)  . 

Internal  storage  allocated  for  the  GAMMA  array  is  currently 
set  within  RINTV  to  150. 
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FUNCTION  RLGAM(ARG) 

Function 

RLGAM  returns  the  value  of  given  a  values  of 

(ARG)  and  at  (ALPV  In  COMMON). 

Parameter  List 

ARG:  Value  of  ^  for  which  r2  is  required. 

Operation 


RLGAM  uses  the  value  of  ALPV  In  COMMON  block  PARCOM  to 
calculate  ARGl*«ty(£)  which  is  used,  in  turn,  as  the  argument  of 
RLOAD  to  return  the  required  value  of  r2(«t 


I 
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5.4.3.  Interpolation 

The  loss  factor  table  contains  values  of  log(G  (or,p>)  for 

values  of  «(  and  p  distributed  throughout  (of,^)  space  according 

to  the  scheme  described  in  Section  5.4.1.  Denoting  the  OL  value 

correpsonding  to  RK*k  on  the  line$«^  byat^,  the  table  entries 

can  be  denoted  by  LG  .  where 

3  » K 

LG  -  log(G*(*  ,*  )).  (5.129) 

J  J 

The  function  G*(ot,$)  can  vary  rapidly  with  ot  and  (S  and  direct 
polynomial  interpolation  was  found  to  be  inadequate.  In 
particular,  small  oscillations  in  the  interpolated  function, 
although  not  significant  in  terms  of  the  overall  accuracy  of 
the  reliability  functions,  were  found  to  require  excessive 
effort  by  the  adaptive  integration  routines  to  achieve 
convergence.  The  procedure  finally  adopted  is  based  on  the  use 
of  bilinear  interpolation  for  the  function  log(G  (at ,  (f  )J. 
Interpolation  is  made  in  the  mC  direction  first.  (Note  that  the 
mesh  is  non-orthogonal :  the  sequence  of  interpolation  can 
affect  the  final  interpolated  value.) 

For  given  values  of  U.  and  (5  such  that  k<RK<k+l  and  +  ^ 

where  RK  corresponds  to  «<  for  the  line  (5 “  (&,  the  interpolation 
in  the  uL  direction  yields  two  values,  LG^  and  LGj,  of 

log  (G  *(•<,£  ) )  at  the  end  points  of  the  line  having  the  given 
value  of  RK,  (see  Figure  5.13)*  The  relevant  equations  are, 

IX,  -  LCjit  *  (L0jik+1  -  LOJik).dUC-k»  (5.130) 

and 

lo2  -  LVi,k  +  <LCJ.l.k.l  -  LVi,k>"K-k>-  <5-15u 

Interpolation  in  the  p  direction  yields. 


>1 
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G  (*,?)  -  exp{LG1  +  (LG2  -  -  |SJ)/(?j+1  -  )  } .  C  3 .  I3  2 ) 


The  use  of  bilinear  logarithmic  interpolation  does,  of 

course,  require  careful  consideration  in  regions  surrounding 

points  where  G  (et, (*)■(}.  Fortunately,  the  form  of  the  function 
* 

G  (0 t,Q)  (equation  (5*63))  is  such  that  these  points  are 
confined  to  easily  identified  boundary  locations  and  special 
interpolation  procedures  can  be  devised  and  incorporated  into 
the  overall  scheme.  The  conditions  leading  to  G*(w,£)»*0  are. 


'/(»  *  R, 


(5.133) 


$  -  tt  ;  for  VIRGIN  -  false 


(5.134) 


for  t; 


(5.135) 


where  £_ is  the  small  number  used  by  PSI  to  set  a  minimum  value 
for  tj. 

The  procedures  associated  with  each  of  these  special 
boundaries  are  described  below. 

(i)  ■  R 


The  condition  **<^(§)  *  Rmax  corresponds  to 

,  ■  R  /+>(&)  and  applies  only  to  oc.  values  having 
max  •  * 

RK"Klim*  Ic  18  aPProPriata»  therefore,  to  consider  the 
treatment  of  this  special  condition  when  interpolating 
in  the  direction  along  the  nodal  0  lines  (^-{S^  say).  A 
special  interpolation  formula  is  required  for 

From  the  structure  of  the  interpolation  table,  if 

^  ( fi.  )*R  ,  then  XR_  •  'Consequently,  the 

lim  3  8X  ^lim”1  m*x 

points  of  intersection  of  the  lines  *  -  *Cand 


1 
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with  «*/(p)“Rnax ,  yield  values  of  and  f'K  _! 

respectively,  where 


a  '  -  v"1  (*  M> 

p  f  max 


(ff  •  13  6  ) 


and 


t'x 


-1  -  sT1  (R  A* 

»  max  K 


lim 


max’  Klim_1 


) 


such  that  and  _L  are  both  greater 

1  im 


shown  in  Figure  5.14).  The  function 
therefore  given  by 


(S’.  13  7) 

than  "t^  ,  (as 
is 


*  rfi  >  , 

6* (ot,(J )  -  r2(rf,  (l  )df' 

V 

which  can  be  approximated  by 
G*(0C,fl)  ~  C.r2(otf(fij))  '('l 


-  r> 


(5.138) 


(5.139) 


On 


p-fj,  r2(«C,(»)  can  be  represented  approximately  by 


log(r, (*,?,))  as  log(r,(^K  ,f.) 
1  3  lim  J 

+  (M  “  ^K,  ,  -l)/(*Sc, 


lim  ‘  "lim  "lim 

*log(r2(Rnax)7r2(^K  -I’fj^* 

lim 


-1 


(5. 140) 


Equations  (5.139)  and  (5.140)  can  be  combined  to 
yield 


log  (G*  (•*  ,-Pj  ) )  *  log  (C)  +  -  t'> 

*l.t(t2<*.„)/r2(»lt  Pj>>- 


i"**,,  -he,. -1 

lim  lira 


•  *  • » 


(5.14D 


3  ?3 


By  enforcing  continuity  at  ,  (L  ) 

1  im 


log  (C  )  <•  log  (G  (Ot 

Klim_1  3 


-  10«<fj  -  Vk.  ,  — L  >  -  (5-“*21 

1 Im  11m 


so  that 


log(0  W.fj))  -  '•=Kll.-l,i  +  *K 


1  im 


+  «  -  * 


K  _i  )  /  (**jr 
lim  lim 


-1} 

lim 


*iOg  (  Tj  'Rmax  )  /r-»  (*- 


2  '""K.  .  -l’^j^ 
lim  J 


(5.143) 


for  VIRGIN  ~  false 

The  case  of  G*(«C,$)  •  0  at  f  -  t^  can  be  considered  as 
a  special  case  of  interpolation  in  the  (3  direction. 
Given  ^  and  ,  the  end  points  of  the  RK  line 
corresponding  to  (*,$)  can  be  denoted  by  (*<1»  P^)  and 

«2»?2^*  corre8Poll<iinB  values  of  log  (G*  («C,jS) )  are 

LG^  and  LG2*  This  special  case  corresponds  to  an 
infinite  value  for  LG^.  (In  practice  the  logarithm 
function  ALOG 1  will  return  a  value  of  -80.0  for  a  zero 
argument.)  Note  that  that  generally  y^(  |S 1  in  the 
vicinity  of  £ so  that  over  the  first  interval  in  ^ > 

*i  -  *v 

The  special  interpolation  function  for  this  case  can 

be  found  by  generating  a  linear  interpolation  formula 
* 

for  log(G  («*,(!  )+C)  where  C  is  a  constant  which  is  found 
by  looking  closely  at  the  form  of  G*(«,|J)  as 
The  linear  interpolation  equations  leads  to 

G*(*,(l)  ■  exp{  log  (C)  +  (?  —  4*1)/((5l  —  pf  2  ^ 

*log((exp(LG2)+c)/C)  >  -  C.  (5.144) 
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Noting  that 

* 

r 2(*f($))  m  (G*(fl£f  §)+C)  log((G*(rf2,^2)+C)  /C) 

.  (5.145) 


so  that, 

r2(«2,$2)  “  (G*(*t2*?2)+C)l08((G*(042*?2)+C)/C)/(P2‘Pl) 

and 

r2Ul’^l)  *  c*1°8((G*(-<2,^2)+C)/C)/(f2-f1) 
and  finally 

C  -  G*<*2,02)r2(«41,£1)/(r2(W2,/J2)-r2(«<1,|f1)) 

.  (5.146) 

The  special  interpolation  formula  is  given  by  equation 
(5.145)  with  C  defined  by  (5.146)’ 

is 

If  r2(<1 ,  P1)-r2(*<2»  ^2) .  then  G (*,  0 )Aconstant  and 

G*(*,P)  can  be  interpolated  via, 

^G*(-,j»)  -  exp{LG2>*(f-f1)/(p2-^1).  (5.147) 


(iii)  frarQ 


If  2  0,  G*(«r,(H~  0.  An  appropriate  formula  for 

over  the  first  ($  interval  may  be  generated  by 
assuming  that  G(«,p,0)  varies  linearly  from  (Jj  to  ?2 . 
Prom  equation  (5.66), 


lim  G  (*,  0, 0 )  -  r2  (•«,(*) 


(5.148) 


and  by  definition, 

G(*.(*2,0)  -  <3*(*,£2) /f2.  (5.149) 

The  assumption  that  G(w,£,0)  varies  linearly  over 
the  first  interval  leads  to, 

G*(«t,P)  -  r2(«*,^1).(i  +  (exp{LG2>  -  f  2 .  r  2  (o*.  2  /  ?2  2 . 

.  (5.150) 

The  interpolated  value  of  G*  (•*,£)  is  provided  by  the 

subroutine  GSTAR  which  uses  the  function  GALP  to  obtain  the 
terms  LG^  and  LG 2  representing  interpolations  in  the  «C 
direction . 
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FUNCTION  GALP ( J , RK) 


Function 


GALP  returns  the  value  of  log(G  (*t,f S))  corresponding  to  a 
given  nodal  value  of  £  ,  £  ,  and  a  given  value  of  the  cC  index, 

RK.  This  value  of  G*(«t,jJ)  is  obtained  via  Interpolation  in  the 


•c.  direction . 


Parameter  List 


J:  Value  of  j  (corresponding  to  (S j )  for  which  the 
evaluation  is  required.  Note  that  GALP  can  provide 
interpolation  along  ^  lines  only. 

RK:  Value  of  RK  for  which  the  evaluation  is  required. 

Operation 

The  default  Interpolation  procedure  is  a  simple  bilinear 
procedure  using  equation  (5.130),  i.e., 

log(GV.f)  -  LGJ§k  +  (LGj>k+1  -  LGj>k)*(RK  -  k) 


G(JK)  +  (G ( JK+N )-G ( JK ) ) *ALPFAC . 


(5.151) 


If  JK»Klim,  then  the  function  GALP  returns  the  value  of 

LG1  K  * 

3 *Klim 

If  LG.  .,<-80.0,  then  G  is  sero  and  the  special 

j ,k+l—  k+lij 

interpolation  procedure  identified  in  (1)  of  Section  5.4.3.  is 
Invoked.  This  interpolation  formula  (equation  5 .  Ilf  1 )  is 
evaluated  by  the  code  following  statement  number  40. 

If  LG^  k+^_<-80.0  and  LG^  k><-80.0,  a  value  of  -80.0  is 

A 

returned  to  indicate  to  the  calling  code  that  G  (or,  ff )  is  sero. 


Significant  Local  Variables 


R:  Largest  Integer  less  than  RR,  (~k) . 


G:  Two  dimensional  array  containg  the  values  of  LG  .. 

j  »K 

JR:  Index  variable  for  G.  JR*j+(k-l)*N  where  K  is  the 
number  of  j  lines  in  the  interpolation  table. 


ALP FAC:  RR-R. 


BO: 


$  ,  che  value  of  the  current  {J  line. 


BDIFF : 


3y  e 
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FUNCTION  GSTAR (ALPV.BETV) 

Function 

*  . 

CSTAR  evaluates  the  function  G  for  given  values  of 

and  £  • 

Parameter  List 

ALPV s  Value  of  oL  for  which  the  value  of  G*(at,p>  Is  required* 
BETV:  Value  of  £  for  which  the  value  of  G*(a<,£)  is  required* 
Operation 


The  operation  of  GSTAR  follows  the  logic  shown  in  Figure 
5.I5. 

Given  and  {3  ,  the  first  operation  associated  with  the 
evaluation  of  G  (*,(3)  is  the  examination  of  the  location  of  the 
point  (*t,£)  in  relation  to  the  region  spanned  by  the 
interpolation  table.  The  following  actions  can  be  taken. 

(i) 

(ii) 

(iii) 


(iv) 

GSTAR  controls  the  interpolation  in  the  f  direction  and 
relies  on  GALP  to  provide  the  values  of  LG^  end  LGj  which  result 
from  Interpolations  in  the  direction .  The  logic  within  GSTAR 
is  associated  with  identifying  the  special  conditions  and 


If  *r<P>>Rmax»  G*(«,£)-0  and  no  further  action  is  taken 


by  GSTAR. 

If  is  such  that  RK<1, 
corresponding  to  RK-1. 


is  set  to  the  value 


If  RK>Kj^a+  6. ,  then  the  evaluation  is  considered  to  be 
illegal  and  an  appropriate  error  message  is  issued.  If 
K^i)<<RK<K^^m+t,  GSTAR  returns  the  value  corresponding 
to  RR"Rj^— • 

If  f  >fg>  f  i»  out  of  range  and  an  error  message  is 
Issued . 


1 


8 

I 


37? 


Figure  5. 15.  Logie  used  by  the  function  QSTAR  to  evaluate 
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determining  the  appropriate  interpolation  formula  as  detailed 
below. 

(i)  If  no  interpolation  in  {3  is  required.  A  single 

*  a 

call  to  GALP  is  used  to  caculate  G  (*,(&)  . 

(ii)  If  LG^^-SO.O,  ( exp{LG2 >“0 ) ,  then  GSTAR  returns  the 

* 

value  0  for  G  («*,|S)  . 

(iii)  If  LG^-80.0,  then  the  special  case  (ii)  in  Section 
5.4.3.  is  identified.  Equations  (5.144)  and  (5.146) 
define  the  interpolating  function.  Note  that  this  case 
can  occur  only  for  J»l. 

If,  for  this  special  case,  rj  (ot^  ,^t)  fir  r2  (*^2  » 1^2^  ’ 
G*(*,£)  is  linear  over  the  £  interval  and  (5.147)  is 
used  . 

(iv)  If  p j  -  0 ,  special  case  (iii)  in  Section  5.4.3  is 
identified  and  equation  (5.150)  is  used. 

The  coding  associated  with  each  special  case  and  the  default 
interpolating  function  (5.132)  is  a  straightforward  coding  of 
the  relevant  equations  using  the  various  local  variables 
defined  below. 

Significant  Local  Variables 


PSIV: 

r<f>* 

RVAL: 

a'y'(P)  • 

ALPV1 j 

oC,  (equation  5.86).  Also 

low 

(5.146). 

used  to 

store 

*7 

for 

ALPV2: 

h  (equation  (5.87).  Also 
(5.147). 

used  to 

store 

*2 

for 

RK: 

at  index  for  Interpolation 

table . 

(See 

Section 

5.4.2.) 
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Bl: 

,2!  fj+r 

Gl:  LG^,  equation  (5.129).  Also  used  to  store  log(C)  for 
(5.144). 

G2:  LGj,  equation  (5.129).  Also  used  to  store 
log(G*(ot2,  f2)+C)  for  (5.144). 

R2C0N:  r2(Uf (f  ))*0j  +  1  .  (used  in  5.150). 

BDB2:  f/{Jj  +  1,  used  in  (5.150). 

Rl:  r2(*41.f1)  for  (5.146). 

R2:  r2U2.p2)  for  (5.146). 

Aj  (r2(«*1,|l1)-r2(A2,jS2))/r2(*<1,^1)  for  (5.146).  Also 
used  to  store  C  for  (5.144). 

Error  Messages 

(i)  'GSTAR  ...  *****,  *****  IS  ILLEGAL':  The  point  (*,?)  is 

such  the  RK>K, .  . 

lin 

(ii)  'BETA  OUT  OF  RANGE  IN  GSTAR':  The  value  of  f  is  greater 
than  the  maximua  node  for  (i.e.  )  . 


[ 

I 

I 
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5.4.4.  Special  considerations  when  including  virgin  risk 

The  term  in  square  brackets  in  equation  (5.63)  is  Included 

only  when  the  VIRGIN  switch  is  true.  This  term,  ‘t^.r^at)  is 

non-zero  for  R  .  <*<R  and  zero  for  ot>R  .  This  means  that 
min—  —  max  max 

*  . 

the  function  G  and  hence  G(^,p,ng)  can  be  discontinuous 

across  the  line  o*«R  . 

max 

In  FBET,  this  discontinuity  is  avoided  by  breaking  the 

integration  over  «c  into  two  sections,  [aC  .  ,R  )  and 

min  max 

[R  ].  As  initialised,  the  loss  factor  interpolation 

max  max 

table  provides  correct  estimates  of  the  loss  factor  for 
integrations  over  the  first  section.  However,  to  comply  with 
the  requirements  of  integrations  over  the  second  section,  the 
term  7^.r^(eO  must  be  removed  from  the  line  of  table  entries 
corresponding  to  **R 

m  ax 

This  facility  is  provided  by  the  subroutine  GADJST  which 
adjusts  the  line  of  table  entries  according  to  the  06  section 
being  Integrated. 


[I 

D 


n 
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SUBROUTINE  GAD JST (NO ) 

Function 

Subroutine  GADJST  adjusts  the  loss  factor  interpolation 
table  to  enable  the  integrations  made  by  function  FBET  to 
correcly  cope  with  the  discontinuity  that  can  exist  across  the 
line  ”Rmax  when  the  term  representing  failures  of  uncracked 
strutures  is  included. 

Parameter  List 

NO:  Control  parameter. 

>0,  the  term  t^r^*-)  is  added  to  the  table  entries 

along  the  line  <-R 

max 

<0,  the  term  T^r^eO  i*  subtracted  from  the  table 

entries  on  the  line  X.-R _ . 

m  ax 

Operation 

The  first  time  GADJST  is  called^  the  term  r1(«t)t1  is 
evaluated  (and  stored  in  FACTOR)  and  the  index  value  R1 
corresponding  to  the  line  ^  is  determined.  This  index 

value  is  converted  to  an  offset  for  the  G  array  which  contains 
the  values  of  LG.  .  . 

i 

If  N0>0,  the  following  equation  is  applied  to  the  entries  in 
G  corresponding  to  the  index  Kl. 

G (J+Kl )«AL0GKFACT0R+EXP 1 (G (J+Kl ) )  (5.152) 

If  N0<0,  the  equation 

G (J+Kl )-AL0Gl  (EXP1  (G ( JK+K1 )) -FACTOR )  (5.153) 

is  applied. 

Note  that  no  check  is  made  by  GADJST  that  NO  changes  sign 
with  each  successive  call.  It  is  up  to  the  calling  code  that 
GADJST  18  used  correctly. 
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5.5.  The  Evaluation  of  PF(t),  Paflt(t) ,rg(t)  and  rT(t) 

5.5. 1.  Overview 

For  a  given  model,  the  reliability  functions  Involving 
the  most  levels  of  Integration  are  Vth  Pdet(t>  “d 
r  (t)  and  it  is  appropriate  to  consider  the  evaluation  of 
these  three  functions  together.  In  fact,  the  Sq  integrand 
functions  and  the  limit  expressions  for  these  functions  are 
sufficiently  similar  that  much  of  the  calculations  can  be 
handled  by  a  common  set  of  subroutines  and  mutual  consideration 
of  these  three  functions  becomes  more  than  mere  convenience. 


When  applicable,  the  evaluation  of  the  virgin  risk, 
rv(t)  involves  a  similar  number  of  levels  of  integration  and 
some  of  the  calculations  can  be  made  by  the  routines  common 
to  the  three  functions  referred  to  above.  It  is  therefore 
appropriate  to  include  ry(t)  (albeit  as  a  slightly  special 
case)  with  the  functions  described  in  this  Section. 


The  four  reliability  functions  considered  here  include 
at  least  one  term  which  has  the  general  form, 


T(t) 


,.(n2)  -rf 2 

S.eZ-oH,  PH, 


p^UJKA.^nQ.tJdmdfdao 

-  (5.154) 


(where  T(t)  indicates  the  appropriate  term  in  the  reliability 
function  and  I(*,(*,n0,t)  the  relevant  integrand  function.) 


J 

a 

D 

H 


This  term  can  be  considered  to  be  composed  of  the  following 


nested  integrations, 

i(n,) 

T(t)*\  F0(a0)da0 


pU2) 

■Un,) 


where  F 


o‘«o>  *  %(*o)j  V?>4?  I 

T2 

•  p^)J^ 


F^UJda. 


(5.155) 


(5.156) 


(5.1 57) 


F^w.)  -  p<c(.c)l(.4$,a0,t). 


(5.158) 


The  fora  for  this  term, as  described  above, applies  to  the  full 
model  in  which  all  the  random  variables  are  included.  If  any  ^orutblc 
is  neglected  then  the  appropriate  Integration  is  replaced 
by  a  point  aval nation  of  the  integrand  and  the  associated 
density  function  is  is  not  included.  For  example  if  aQ  is 


held  constant,  a„„_  say, 

COO 


T<fc)  *  Vcon* 


“d  FoUcon>  m 


4 


k  i 


(5.159) 

(5.160) 


The  code  structure  required  to  perform  the  integrations 
(neglecting  random  variables  where  necessary)  can  be  represented 
schematically  by  the  flow  chart  in  Figure  5.^  which  has 


been  constructed  according  to  the  following  scheme. 

(1)  Logic  flow  can  be  either  forward  (top  to  bottom) 
or  reverse  (bottom  to  top). 

(11)  Initial  entry  and  final  eait*from  the  logic  is  at  the 
top  of  the  diagram. 

(Ill)  Small  boxes  indicate  evaluation  of  the  term  within 
the  box(  only  when  the  logic  flow  through  the  box 
is  forward. 

(iv)  On  completion  of  the  evaluation  of  the  function  in 
the  lowermost  box  the  logic  flow  direction  is 
reversed. 

(▼)  Large  boxes  indicate  the  adaptive  integration 
control  routines  which  can  direct  logic  flow 
in  both  directions.  Integration  limits  are 
indicated  and  are  assumed  to  be  evaluated  each 
time  the  box  is  entered  from  above. 

( vi )  Diamonds  indicate  decisions  which  can  affect  logic 
logic  flow  only  when  approached  from  above.  Reverse 
flow  passes  through  these  diamonds  as  if  they  did 
not  ejd.st. 

(vli)  Rounded  boxes  indicate  control  points  associated 

with  the  evaluation  of  the  three  levels  of  integrand 
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functions  (FQ( a^) ,  F^(£)  and  FjfiL)).  Logic  between 
two  control  points  is  associated  with  the  upper 
control  point  and  is  included  in  the  routine  which 
hears  the  name  included  in  the  box. 


t 

The  control  points  have 'memory  in  that  reverse  flow 
is  directed  along  the  same  path  as  the  box  was  entered 
during  the  previous  forward  flow.  This  concept  is  reinforced 
by  using  two-way  arrows  to  indicate  the  links  between  the 
adaptive  Integration  routines  and  the  integrand  function 
control  points.  This  implication  is  that  the  integrand 
evaluation  is  under  the  control  of  the  adaptive  integration 
process.  A  one-way  arrow  terminating  at  a  control  point 
indicates  a  single  evaluation  of  that  integrand  function. 

A  broken  line  links  that  arrow  with  the  return  flow 
following  evaluation  of  the  integrand. 


The  diagram  also  Indicates  the  flow  of  information 
relevant  for  the  estimation  of  errors  associated  with  the 
adaptive  integration  procedure.  The  error  estimation  process 
which  was  described  in  Section  4. 1»  relies  on  the  integrand 
functions  producing  error  estimates  for  the  evaluation  of 
the  integrands.  Zn  a  nested  process  these  error  estimates 
are  produced  in  turn  by  the  embedded  adaptive  integration 
routines  used  to  evaluate  the  integrand  functions. 

The  inclusion  of  an  error  variable  as  an  argument  of 
an  integrand  function  control  point  Indicates  that  it  is  the 
function  of  the  logic  below  that  point  to  produce  that  error 
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term  which  will  be  used  by  the  adaptive  inti gr at ion  algorithms 
above  the  control  point.  The  overall  error  estimate  for  the 
evaluation  of  the  reliability  function  la  produced  by  the 
outermost  adaptive  Integration  routine. 

The  code  used  to  evaluate  all  the  reliability  functions 
follows  the  general  procedure  described  by  Figure  5.16,  with 
minor  modifications  (such  as  the  omission  of  levels  of 
integration  or  the  inclusion  of  extra  terms)  as  the  need  arises. 
The  descriptions  that  follow  highlight  these  differences  and 
provide  specifications  for  the  integrand  function  routines, 
which,  in  general,  will  differ  between  reliability  functions. 

For  the  functions  described  in  this  Section,  the  only 
integrand  function  routine  to  change  between  functions  is 
the  outermost  routine,  denoted  in  Figure  5.1 6 by  F$.  FBET  and 
FALP  are  common  routines  which  access  various  logical  switches 
and  control  variables  to  ensure  that  the  correct  forms  ef 
the  integrand  functions  for  a  given  reliability  function  are 
evaluated.  The  relevant  variables  and  the  meanings  of  the 
values  that  they  may  have  are  listed  in  Table  5.9  .  Note  that 
if  a  single  value  of  a  logical  switch  is  listed,  then  the  other 
possible  value  ('true'  or  'false')  has  the  opposite  meaning. 

Note  also  that  the  last  three  variables  in  the  table  are 
associated  with  graphics  operations  which  are  described  in 
Section  5*10. 

Because  the  switch  BETCON  la  used  to  denote  that  £,  is  constant 
and  to  all  intents  and  purposes  (Sis  also  constant,  this  case 
will  be  sometimes  referred  to  as  '  A  constant'. 
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Kano 

Typo 

COMMON 

Block 

Valuo 

Meaning 

ALP  CON 

Logical 

I  NT  CON 

True 

Variations  in  strength 
(«.)  are  ignored. 

BBT CON 

Logical 

INTCON 

True 

raWb'vc 

Variations  in  ^fatigue 
life  are  ignored, A  is 
constant. 

BNOCON 

Logical 

INTCON 

True 

Variations  in  initial 
crack  length  are  ignored. 

POPLOS 

Logical 

LOO COM 

Falao 

The  effect  of  the  loss 
factor  is  Ignored. 

FOLSV 

Logical 

LOG COM 

True 

Falso 

Pg(t)  is  calculated  via 

the  Integral  expression 
for  Pg(t). 

Pg(t)  is  calculated  via 

approximate  integration 
of  r(t). 

BISK 

Logical 

LOGCOM 

True 

Current  reliability 
function  is  r  ( t). 

9 

VIBQIN 

Logical 

LOOCOM 

True 

Current  model  includes 
risk  terms  for  uncracked 
structures. 

INSPTS 

Logical 

LOO COM 

True 

Current  reliability 
functions  are  affected  by 
a  previous  inspection. 

CONTON 

Logical 

INTOON 

True 

Contour  plots  of  Integrands 
are  required. 

PLTINT 

Logical 

INTOON 

Truo 

Integrand  plotting  is 
activated. 

BOOT 

Intogor 

INTOON 

1.2 
or  3 

Level  of  outermost  integr¬ 
ation.  e.g.  1  implies  that 
the  outermost  integration 
is  that  controlled  by 

ADAPTO  in  figure  5. 

Table  5.9.  Variable*  aasoclatad  with  the  control  of  tho  logic 
for  tho  evaluation  of  tho  rollatolllty  fuaetloaa. 


5.5 .2.  Probability  o f  Failure  P^(fc) 

•*> 

The  probability  of  failure  is  gLven  by  equation  (3.80), 

«u2) 

PF(tJ  =  PF(t»n0)pao(ao),is0  -h  P^(a(n2))  (5.161) 

^e(nj) 

where  PF<t,nQ)  is  defined  by  equations  (3.93).  (3.H6),  (3.135) 
and  (3.159)  depending  on  the  model  class.  These  equations 
are  summarised  in  Table  3.10. 


Using  the  notation  of  equations  (5.15-4)  to  (5.15® 
and  using  PSLTO(uq)  to  replace  FO^),  the  set  of  equations 
determining  Pj,(t)  are  equivalent  to  the  system, 


ff^f(Hmin) 

FRLTO(a0)  w  [p  Cso^U  Ff((i)df  + 

^i(V 


•*max  I 

P^(f)d^\  (5.  16'2) 


VW 


f«-(n0,p) 


p^CrfJd*  (5.163) 


ain 


F*.(«0  »  |p<t(«c)J  (l  -  H(*,f  ,nQ,t)  )  ,  (5.164) 

where,  for  the  present,  the  terms  representing  the  failures 
of  uner ached  structures  have  been  neglected.  The  square  brackets 
around  the  density  functions  indicate  that  the  functions  are 
included  only  when  variations  of  the  associated  random  variables 
are  included  in  the  model. 


Model 


a(n2) 


PF(t) *  PF 
a<nj" 


pl<tiVp«0<aO,daO  ♦  P  (a^)) 


Model 

Full 

f*f(W  rll'f'W  .  "I 

1  ^  L  (1-H(*,p,n0,t»p  (*)<*+£<*  U0»f))  d* 

'MV  LJ*<n0.p>  J 

+*  Pit(O(1-e^>(-r1(f0t})d^-*.p<tUv)| 

*  tyV 

Const. 

1 

»>w 

*i  Co  net. 

. 

VMm,* 

PKUXl-B(.,t+ii0,n0,«))4«*{((.i  (n0,n0+ 1)) 

raaz 

or  r(a0,0)j^  ( 1-exp^-r^acJt^  )  pjU)d* ;  t+aQ<  ^ 

X.,  and  *c 
Coast. 

1  -  H(S'0,t*a0,a0#t)  ,  t14t«0<bf 

or  1  -  erp{_-r1  (5Q)t\  ®0*  0  “d 

Table  5.10.  Summary  of  expreaaions  for  the  probability  of  failure,  P_C t) 
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Equations  (5.|62)  to  (5.^4?  together  with  the  logic 
described  by  Figure  5. 17  are  equivalent  to  the  set  of  equations 
presented  in  Table  5. 10  (neglecting  the  uncracked  terns).  The 
figure  follows  the  conventions  established  in  Section  5*5.1 
and  includes  the  extra  terns  which  represent  structures  that 
have  reached  the  1^  subspace,  (or  tine-zone  of  failed  or  rejected 
structures). 

The  logic  above  the  FRLTO  control  point  is  contained 
with  the  function  HSKTOT  which  is  described  in  Section  S-2.2^. 

The  renalnder  of  the  logic  is  handled  by  the  adaptive  integration 
routines  together  with  the  functions  FRLTO,  FBET,  FALP,  PBETA 
and  PALPHA.  A  summary  hierarchy  of  these  functions  is  presented 
in  figure  5.18  . 

The  contributions  fron  uncracked  structures  are 
included  as  correction  terns  by  the  function  FRVO,  described 
in  Section  5*5.4  below. 

e 

When  evaluating  Pg(t),  the  logical  switches,  RISK  and 
FOLSV  have  the  values  'false'  and  'true'  respectively.  These 
switches  are  used  by  the  functions  FBET  and  FALP  to  ensure  that 
the  correct  Integrand  terns  are  evaluated. 

The  accumulation  of  the  error  estimates  is  largely 
controlled  by  the  adaptive  integration  routines  as  described  in 
Section  4.1.5. 
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5.5.3.  Bisk  of  Static  Frachre  by  Fatigue 

The  risk  of  static  fracture  by  fatigue  Is  given  by 
equation  (3.84)»  i.e.f 
a(ng) 

rs((t)Sl  Pfs(t»a0)Pso(<l0)d*0/tS(t)»  (5.165) 

)a(nT) 

together  with  equations  (3.90),  (3.H9)»  (3.138)  and  (3.162) 
for  the  various  classes.  These  equations  are  summarised 
in  Table  5.1 1  and  can  be  replaced  by  the  set. 


FPSO(a0)  =  Pfs^^’^^aQ^O^ 


-M, 


e 


FA*jd*~ 


(5.166) 


(5.167) 


and  w.  r2(*f(  f) )B(*, £, nQ, t)  C p*/*)"] .  ( 5. 168) 

together  with  the  logic  illustrated  In  Figure  5. 16#  (with 
FPSO  replacing  FO).  Noting  that  (5.166)  Is  equivalent  to  the 

firsts  term  in  (5.162)  r  (t)  can  be  evaluated  using  FBLTO 

8 

FBST  end  F ALP  using  the  switch  BISK  to  remove  the  extra  terms 
as  required.  The  function  hierarchy  is  shown  in  Figure  5.9  . 


The  logic  above  the  control  point  FHLTO  is  controlled 
by  the  function  RJSKTOT. 
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The  integral  expression  for  the  probability  of  detection 
is  used  only  when  Pg(t)  is  computed  by  integrating  r(t)  with 
resect  to  time.  This  condition  corresponds  to  the  switches 
RISK  and  FULSV  having  the  values  'false'  and  'false'  reJectiveljr. 
Pdet(t)  is  given  by  equation  (3.82), 
a(n2) 

Pdet<t)S  Pdet^’VVV^O  (5.*9> 

Ja(ndl)  ^ 

together  with  equations  (3.94),  (3.11?),  (3.136)  and  (3.160)  for 
the  various  classes  of  medel.  Neglecting,  for  the  moment, 
the  terms  in  (3.94)  and  (3.136)  for  uncracksd  structures,  these 
equations  (which  are  summarised  in  Table  5.12),  can  be  replaced 
by  the  set, 


FBETO(a0)  a 

A 


V w 


Ff(P>df]  (5-,70> 


(5.1?1) 


^  *max 

Fp(^)  #*(*)*<  (5.172) 

•  *.(»o*£  ^ 

F^U)  =.  [p> )]  H(*,  $,n0,t) 
aad  the  logic  described  by  Figure  5.20. 


(r.  173) 


t+oo 


If.  oo 


Probability  of  Detection 


-aU2) 

Pdet(t)  *  1  Pdst<t»a0,*s<«0,d*0 

J*<*d1> 


Class. 

Fall 

f*  d 

pM )  \  p-L(flOHU,(l,n0>t)<ktd(S 

J*1(V  JAnot^) 

pf<W  f-kax 

J  p^(f)  I  »Sg#t)4td^ 

d  J**(.n04)  . 

t'y 

SXt^tlj)  S'(nofO)P^(t1)J^^  exp{-r  1  (•(■) i  t4(tQdaC. 

•c  Const. 

r^W 

j  _  pj<f)B(S0,(,.0,t)df 

X,  Const. 

[V*VV 

J  #  p^UJHk.t-WQ.nQ.tJd*  tdit«0<tf 

f‘r 

or  rCnQpOjftt.ti^  1  ^Utiixp^r^yt 

}*w±a. 

t+n0<  \ 

•(.and  X, 
Coast. 

H(50.t«0»,lo*t)  tdin0^<tf 

Tabla  5.12,  flu  am  ary  of  expressions  for  PJ 
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The  functioa  hierarchy  is  shown  in  Figure  5.21 


The  functions  F^CjJ)  and  F^j  (^J)  differ  only  in  the  upper 
limit  of  the  aL  integration.  The  function  FBET  detects  that 
the  probability  of  detection  is  being  evaluated  and  sets  the  upper 
limit  according  to  the  value  of  PLB^(B^).  If  PLD  «  0,  the  function 
Fp({S)  is  evaluated,  whereas  if  PLD>0,  the  function  F^(ji)  Is 
evaluated.  Thus  when  the  second  integral  in  (5.170)  is  evaluated, 
PLD  is  set  temporarily  to  zero  and  restored  to  its  proper  value 
after  the  integration  has  been  completed.  Note  that  in  the  case 
of  a  non-preof  load  inspection,  PLD  will  be  zero  anyway:  only 
one  of  the  terms  in  (5.170)  should  be  evaluated.  The  code  ensures 
that  this  is  the  case  (for  simplicity,  this  logic  is  not  shown 
in  Figure  5.20)). 


For  models  in  which  is  allowed  variation,  a  term  for 
uncracked  structures  must  be  evaluated  and  has  the  form, 

Vt»n0)  -  [W][  '*(*>*fc  •  (5. 174) 

■'“tain 

This  extra  term  is  Included  only  at  the  first  inspection. 

The  logic  above  the  FDGTO  control  point  in  Figure 
5.20  is  controlled  by  the  fuaetie*  FPDET. 
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Figure  5.21.  Hierarchy  of  function  sub-pro  grams  used  to 
evaluate  Pdet(t)* 


The  virgin  risk  le  computed  only  when  nQ  =  0  and  £^>0. 

These  conditions  can  be  established  during  data  Initialisation 
and  the  requirement  for  the  calculation  of  r^(t)  indicated 
by  setting  the  switch  VIRGIN  'true*.  It  Is  possible 
to  over-ride  these  conditions  and  set  VIRGIN  equal 
to  'false'  as  part  of  the  input  data  and  thereby 
neglect  the  risk  of  failure  of  uncracked  structures. 


The  virgin  risk  is  given  by  equation  (3.95) •  it, 

p^GO r^Cet) exp^-r ,  GO  t$  t±) /P^(  t ) . 


ry(t) 


r 


(5. »75) 


Defining  the  following  functions, 


FRTOCuq)  »  PfvC*t).Ps(t) 

^0tBBin) 

=  [pf(\^l  F^Wdoc 
*Sr 


FJW  [p^GO^  r ,  (oO exp  -r }  U )  t^ 


(5. 176) 

(5. 177) 


the  virgin  ride  can  be  evaluated  using  the  logic  shown  in 
Fig.  52 2  with  RISK  ■  'true1.  The  expressions  for  r^Ct) .evaluated 
by  this  logic  are  summarised  in  Table  5. T3. 


Note  that  the  integrand  function  F^*)  can  be  written 


i+cs 


r*Y* 


r  (t)  *r(a0,0)pfv(t)/Ps(t) 


Model 

pfT(t) 

Full 

1 

l<°‘B.ax> 

p<t(,Or1(-Jexpt-riC,Ot5 

s.T 

•(.Const. 

r1(H0)*xpi-r1l5o>t^  pp(V 

X.  Const 

1 

r<,(0.t) 

p^(«0sxp^*r^C^.)\r^C*.)d<  t<t^ 

*■  «“d  h 

Const. 

r1(H0)exp^-ri(?o>tl  t 

Table  5.13.  Summary  of  expressions  for  the  virgin  risk*  rv(t) 
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««» 

F^OC)  =  [p^U)]  r1C*.)HU,0,0,t)  (5.178) 

so  that  provided  the  loss  factor  function,  OVAL, 
returns  the  tern  r^fcO  for  the  case  nQ  s  0,  and  f»0, 
the  function  FALP  can  be  used  for  both  r  (t)  and  r  (t). 

8  V 


The  factor  P^(t±)  ia  (5. 116)  i  which  involves  a  single 
level  of  integration,  is  fixed  for  a  given  value  of 
time.  Since  this  factor  also  appears  In  the  terns 
in  Pg(t)  representing  uncracked  structures  it  is  computationally 
efficient  te  account  for  these  tersn  when  this  factor 
is  available,  rather  than  evaluate  it  again  when  evaluating 
Pg(t).  The  correction  of  Pg(t)  is  therefore  made 
by  the  function  FBVO.  Examining  equation  (3.93)  and 
denoting  the  uncorrected  probability  of  survival  by 
pl(t),  the  correct  function  is  given  by,  (for  the  full  model). 


H-0  8 


h-oS 


/2( 

p*.w  4*‘'  P*(M 


(5. 180) 


where 

»  ft^U)  Q  1  -  *C*iP,0,tj]  .  (5.181) 

The  correction  tern  can  be  evaluated  using 
the  logic  in  Figure  5.22. with  RISK  equal  to  'false'. 


The  .  function  hierarchy  for  the  evaluation  of  r^(t) 
and  the  survivorship  correction  term  is  shown  in  Figure  5.23. 
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FUNCTION  PALP(APO) 
Func  t Ion 


FALP  evaluates  the  term. 


T(o<)  -  o<K(<a‘)r2('KV'(/«))Lf  («,4,n0,t)  (5.192) 

where  is  the  density  function  for  o<  ,  r  2  (•<<?(£) )  is  the 

risk  rate  for  cracked  structures  and  L  ^  («r,>S,n^  ,t )  is  a  loss 
factor  tern,  the  orecise  form  of  which  depends  on  the 
reliability  function  currently  bein'*  evaluated. 

The  term  evaluated  by  FALP  is  the  innermost  integrand  of  the 

expressions  for  P_(t),  P.  _(t)  and  r  (t). 

v  aet  S 

Parameter  List 

APO:  The  value  of  <»<  for  which  the  term  is  to  be  evaluated. 
Operation 


The  expression  evaluated  depends  on  the  states  of  the 
logical  switches,  RISK,  FMLRV  POPLOS  and  ALPCOM  according  to 
the  followin'?  scheme. 

If  ALPCON  is  true,  then  variations  in  are  ignored  by  the 
model  and  o^(*<)  is  replaced  by  1.  Otherwise,  p-<(<*<)  is 
evaluated  usine  the  function  PALPMA. 

• 

If  RISK  is  true,  then  the  risk  term  r2KV/C^))  is  included. 
The  current  value  of  R  is  evaluated,  stored  in  COMMON  and  used 
as  the  argument  of  function  RLOAh  to  evaluate  the  risk  term. 
If  HIV'  is  false,  this  risk  term  is  not  included. 

If  POPLOS  is  false,  then  the  loss  factor  tern  is  neglected 
from  the  calculation.  Otherwise  it  is  evaluated  and  takes  the 
following  forms. 


'A 


*// 


(i)  If  RISK  is  false  and  FULSV  is  true  then  the  current 
calculation  can  only  he  for  Pp(t)  and  the  loss  factor 
term  is  given  hy 

1  ^  (°*  » n  q  » t )  *  1  "*  H  %/S  %  n  q  , 1 ) 

-  1  -  E  X?  1 (-RNSV*GVAL(ALPV,RFTVH 

...  (5.183) 

where  the  required  variables  are  assumed  to  he  set  hy 
•code  external  to  PALP. 

a 

If  the  argument  of  EXPI  is  small  (jtlO  )  the  loss 
factor  term  is  aoproximated  by  using  the  series 
expansion  for  the  exponential  function  so  that, 


Lf  («,/5,n0,t)  -  R'!SV*GVAL(ALPV,3ETV)  .  (5.184) 

(ii)  If  RISK  is  true  or  FULSV  is  true  then  either  Pdet;(t>  or 

r  (t)  is  being  evaluated  and  the  loss  factor  tern  is, 
s 

L  ^  n  q  ,  t )  ■  H  («<,^,ng,t) 

-  EXP  1 (-RKS  V*OVAL ( ALPV, 3ETV) )  (5.1 85) 

(iii)  If^-0,  then  PALP  is  required  to  return  the  correct 
integral  term  for  uncracked  structures.  It  is  assumed 
that  OVAL  and  PSI  will  return  rj(o<)  and  1  resoectivelv 
for  this  case. 

Oranhlcs  Operations 


If  FALP  is  being  called  by  the  intgrand  contouring  code, 
PLTPMT  is  called  to  construct  a  representation  of  the  current 
evaluation  ooint  in  (&%/&)  mace  • 

If  integrand  functions  are  being  olotted  and  the 
Integration  is  the  outermost  Integration,  PLTSTR  is  called  to 
store  the  evaluation  for  later  nlottlng  as  an  outer  Integration 
plot. 


/ 
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COMMQ*’  Variables  Accessed 
PSIVAL:  Current  value  of  • 

BETV:  Current  value  of^. 

ALPCOR:  Constant  ®<  switch. 

RISK:  Risk  function  switch. 

POPLOS:  Include  population  losses  switch. 
PLTI*JT:  Plot  integrands  switch. 

COVTON:  Contour  nap  switch. 

MOOT:  Outermost  integration  level  Indicator. 
COmvq>i  Variables  Changed 
ALPV:  Current  value  ofcK. 

RVAL:  Current  value  of  R. 


I 
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FUNCTION  FBET(ARG, ERROR  1) 


Function 


FBET  evaluates  the  term, 


T((J>  =  [pf((»)]_ 


F^(«c)  d  oc 


p  (*Odoc 
«c 


(5.186) 


-'a. 


where,  numerically,  F^(*0  -  FALP( ALPHA).  This  term  appears  in 
the  expressions  for  Pg(t),  ^^(t),  rv(t)  and  rs(t).  FBET  accesses 
various  control  switches  to  determine  the  appropriate  expressions 
to  evaluate. 


Parameter  List 


ARG:  Value  of  (S  for  which  the  term  is  to  evaluated. 

ERROR1:  Error  estimate  associated  with  the  evaluation  of  the 
term  (returned  to  the  calling  code).  This  estimate 
is  produced  by  the  adaptive  algorithms  used  by  FBET. 

Operation 

The  sequence  of  operations  follows  the  flow  chart  shown  in 
Figure  5.24.  and  consists  of  two  major  phases,  the  evaluation  of 
p^(^)  followed  by  the  evaluation  of  the  integral  term  in  the 
square  brackets  in  equation  (5.186). 

(i)  Evaluation  of  p^(^) 

The  value  of  f  determined  by  ARG  is  trasferred  to  common 
storage  as  BETV  for  use  by  other  functions  and  is  then 
tested  to  ensure  that  it  is  within  the  interval  [t* ,  t  . 
FBET  returns  the  value  0  if  is  outside  this  interval. 

The  value  of  <j/(|J)  is  also  calculated  and  transferred  to 
PS1VAL  in  common.  If  ylf&)s.O,  an  error  message  is  created 
and  no  further  processing  is  done. 


IHH- 


Figura  5.24.  Sequence  of  operations  aacacutad  by  FBET. 


^/tT 


If  BETCON  is  false,  the  term  pg(p )  is  evaluated  using 
the  function  PBETA.  If  the  density  function  is  zero,  no 
fur.ther  processing  is  done  and  a  zero  value  is  returned 
for  FBET,  For  a  model  which  ignores  variations  in  fatigue 
life,  BETCON  is  true  and  p^(£)  Is  omitted  /from  the  term 
returned  by  FBET. 


(ii)  Evaluation  of  Integrations  over  at. 

If  variations  in  <*.  are  ignored,  ALP  CON  will  be  true 
and  a  point  evaluation  of  the  integrand  is  made.  For 
I^(< )  «■  FALP( ALPHA) ,  otherwise  a  zero  is  returned. 


IF  ALP CON  is  false,  the  integrations  in  C 5- 186)  must  be 
evaluated.  The  limits  <<  1 ,  and  are  evaluated  according 
to  the  requirements  of  the  function  being  evaluated  by  the 
external  code.  For  all  functions, 

*  *<-#(n0,f)  (5.18?) 

as  defined  by  equations  (5.52),  (3.53)  sad  (3.128).  For 
Pp(t)  and  ra(t), 

*2  <5.188) 

as  defined  by  equation  (3.56),  while  for  pdet(t) 

*2  -*2((*,Hp)  (5.189) 

or  _ if  R  is  zero  (see  Section  5.5.4). 

max  p 


The  second  term  exists  only  when  Pj,(t)  is  being  evaluated; 
for  this  function,  ^ 


a. 


min' 


(5. 190) 


If  the  reliability  model  includes  a  virgin  risk  term,  it 
is  possible  that  the  loss  factor  term,  which  is  included  in 
the  integrand  term  evaluated  by  FALP,  is  discontinuous 
across  the  line  R^m*.  The  handling  of  this 
discontinuity  is  discussod  in  Section  5.4.4  in 
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hK> 


connection  vith  the  evaluation  of  the  lose  factor.  The 
essential  renuirement  as  far  as  T'h  r"‘  Is  concerns  •’  in 
that  the  integration  of  r'l’  oust  he  cade  over  tvo 
suh-intervals  [^,I'riai<l  an!  ("  nax  .«*.,]  •  *  call  to 
o,  \n.T<?7  before  an-1  after  the  integration  over  the  second 
interval  notifies  the  in t o r oo 1  a t in n  table 

amrooriately. 

"he  cole  in  toco  .jor  forms  the  necessary  integrations 
mi  accumulates  the  error  estimates  from  eac'1 
integration  in  a  s  t  r  a  1 »  h  t  f  o  r  mar  *  an-4  obvious  manner 
usin’  the  adaptive  al’Drit'^s  desecribed  in  Section 

4.1. 

"ran'-,  ic3  ^aerations 

If  the  integration  over  £  is  the  outermost  inteyration  of 
the  function  v,einy  evaluate-4  and  into  rand  ’'lottln’  is 
resulted  (as  controlled  by  ’’ITIT!)  ,  PI  TP TP  is  called  to  store 
each  evaluation  for  later  -ilottln’. 

"rmr  "ess  ayes 

(  i  1  'fnnm  ....  nr, -J  Tq  yron  pp->  fT  A 
called  vith  i.14  C  e  pua  1  to  a  value 
aero,  "o  further  processiny  is 
the  value  P. 

Common  ,rarithle3  deceased 


»5  *T  re  , 

Current 

value 

0  ? 

V 

t***  "l  • 

Current 

val  ue 

0  f 

V 

*  ( t ) : 

Current 

value 

of 

n 

m  in 

«*  /'•)  s 

Current 

value 

of 

r> 

nax 

07.  n  , 

Curran  t 

vi  l  ue 

o  £ 

P  . 

-) 

”  *  * *  * ' ;  my  V-  has  been 

of  (3  for  ”h  i c h  y  )  is 


'  a  J.  ^  ^  r*  *1  r  ^  ^ 


returns 


o  v  n 

•>  ■*  i  • ' 
o  v  <;  \r 

ALP'tT" 
AL»M\X 
ALnCOM 
VC  T  C  0  V 
I  ’•}  S  ?T  S 
PO^tOS 

vt^om 
E?*3 1 -IT 
*IOUT 
COMMON 


Current  value  of  n^. 

^Ine  of  last  inspection. 

Current  value  of  time. 

•*  .  . 

m  In 

ma* 

Constant  switch. 

Constant  Q  switch. 

Inspection  switch. 

Include  population  losses  switch. 

Virgin  risk  switch. 

Convergence  criterion  for  adaptive  integration. 
Outermost  integration  level  indicator. 

Variables  Changed 


bCTV:  Current  value  of  £  . 
"SIVALi  Current  value  of  f (^) 


FUNCTION  FDBTO (ARG, ERROR  1) 


Function 


FDBTO  evaluates  the  function  P^^Ct,^)  used  in  the  evaluation 
of  tii«  probability  of  detection.  Ihia  tarn  baa  tba  fora*  for  the 
no at  general  aodal. 


FDtlD(^)  .  [P^<V] 


Jf,<V 


V«>  H 


JU.tipftnQ.O)*  P#Ct^) 


•xp 


(5. 19D 


Paraaeter  List 

AEG:  Value  of  Sq  for  *blcii  the  evaluation  of  tpa'^a^) )[  p<a(o0)'| 
la  required. 

ERROR 1 :  Error  estlaate,  ra turned  by  FDBTO,  representing  tbe 
accuaulated  effecta  of  any  lnte (ratio oa  uaed  In  the 
evaluation. 

Operation 

FDBTO  la  evaluated  la  two  stage a.  The  first  stage  follows 
the  logic  between  the  control  points  FDBTO  and  FBIT  in  figure 
3.20  and  evaluates  FDBT  without  any  contribution  froa  uneraefced 
structures. 

The  second  stage,  which  la  applicable  only  at  the 
first  Inspection,  evaluates  the  contribution  froa  uaeracfced 
structures  which  are  rejected  by  a  proof  load  laapsctloa. 


The  code  is  a  straightforward  implementation  of  the 
requirements  of  the  various  possibilities  listed  in  Table  5. 12. 

Note  the  use  of  PLD  to  switch  FBET  to  use  alternative  limits 
of  lntegratiqn.  The  correct  value  of  PLD  is  stored  ia  PLDSTE 
while  PLD  is  temporarily  set  to  zero.  Note  that  if  PLD  =.0  on  entry 
to  FEBTO,  only  one  of  the  integrations  over  £  is  made. 


H-ZO 


ij*ib 


"unction 


Fn"'rT  evaluates  t'1G  ^ro'ia,iilU»  of  Istectlon,  °_j  (t)  at  in 

inspect  ion • 

n  a  r  a  n  e-t  e  r  T.  i  s  t 

? I”?0:  "a  1  ue  of  ti-’e  at  vhich  "  ,  ft)  is  reunite'1. 

let 

iiarat Ion 

ro-i^T  called  ml’/  •./l'en  the  nr  Vi  ab  il  1 ty  of  survival  is 

calculated  via  amrorlmte  integration  of  t'i«  total  r  i  s rata 
and  handles  the  loqlc  above  the  -co'-to  control  point  in  ’’ivire 

5- zo. 

"or  the  case  of  rodels  vithh  varvinq  a^,  it  is  assumed  that 
the  call  to  r"*i-T  alvavs  fol1.o'/s  a  call  to  "rTfi’  for  tv,e  sane 
value  of  tine  as  sneci^ied  by  so  chat  the  o^  1  ~  "  1  *■  S  n  1 

ar1  n,  are  available  in  D'T r|M I'T  and  "VOT,!'*  respectively.  T‘o,‘ 

the  case  of  a  model  with  constant  relative  fatigue  life,  ENOMIN  is 

nodified  to  ’/i ?ld  n^  as  specified  by  equation  (3«1^»8),Csee  table  5*d6)« 
The  Units  are  then  evaluated  anJ  the  adaptive  routine 

lnd°T0  used  to  ner'orn  the  required  integration. 

"ranhics  °ne ratio  ns 


The  construction  of  an  outer  Integrand  plot  is  controlled  bv 

callin'*  PLTOy-  on  entry  n^TO'TT  on  conoletion  of  the 

evaluation  of  71  .  (t). 

'let 

rr,,..0..  Variables  Channel 

a.. n-'t";  Lover  n«  linit  for  integration. 


J+  z  t 


FUNCTION  FRLTO(ARG) 


Function 


FRLTO  evaluates  the  functions  [pa0(a0)]PF(t*n0)t  (RISK* false) 
Jpa^(a0^pI.(t,n0) ,  (RISK  «. true).  The  function  returned  by  FRLTO 


has  the  general  fora, 


r  -iffVW)  r^max  7 

FRLTO(aQ)  Pf(f)  *(*!  P,(‘VW¥) 


JfilV 


(5. 192) 


Parameter  List 

ARC:  Value  of  a^  for  which  the  evaluation  is  required. 
Operation 

PR LT 0  controls  the  loqic  between  the  control  points  pRT.rn 
and  FRFT  In  Figure  5.0or  FO  and  FRFT  In  Figure  5  .it  A  detailed 
flow  chart  for  the  function  Is  given  In  Figure  S-lTwhich  also 
Includes  the  graphics  operations  executed  by  FRLTO. 

The  following  points  are  worthy  of  notice. 

(i)  PI  and  i:  contain  the  limits  ft. (n„)  and  t^(R  .  ) 

i  i  j  *  n  m 

respectively  and  these  are  evaluated  hv  the  subroutine 
R*TALM. 

(il)  The  integrations  with  respect  to  (S  use  the  nodes  o: 
loss  factor  in t a r no  1  a t ion  table  as  a  basts  for 
adaptive  integration  strategy  when  appropriate. 

Craphlcs  Operations 


tf  required,  PLTST”  is  called  to  store  the  evaluation  for 
3uhseq.,ent  construction  of  an  outer  integrand  plot. 


J+: ZZ 


2-T_ 


H-  Z  «3 


The  construction  of  two-dinensional  contour  maos  ( In  o<  ,y8 
SDace)  of  the  integrand  functions  is  controlled  by  FRLTO.  The 
whole  process  is  controlled  by  the  subroutine  I'lTPLT,  as 
described  in  Section  5.  in. 2. 

Error  Messages 

(i)  'FRLTO  ...  B1.GE.32';  The  limits  of  integration 

preclude  an  evaluation  of  the  first  term  in  curly 
brackets.  The  error  is  non-fatal  and  FRLTO  returns  a 
zero  value  for  this  tern. 

COMMON  Variables  Changed 

RNQ:  Current  value  of  nQ . 


FUNCTION  RRVO(AP.O) 

Function 

FRVO  controls  the  evaluation  of  the  virgin  risk  rate,  rv(t) 
and,  if  necessary,  the  adjusteraent  of  Pg(t)  to  account  for 
failures  of  uncracked  structures* 

Parameter  List 

ARG:  Value  of  a^  for  which  the  virgin  risk  is  required.  ARC 
mus t  be  zero  otherwise  the  calculation  of  virgin  risk 
is  not  appropriate  for  the  model. 

Operation 

FPVO  controls  the  logic  above  the  FALP  control  ooint  in 
Figure  5.  The  calculation  of  rv(t)  is  executed  first  bv 
evaluating  (if  BETCON  is  false)  and  then  either 

integrating  FALP  over  «<  or  making  a  point  evaluation  of  the 
integrand  (FALP). 


The  P,,(t)  correction  term  is  evaluated  by  repeating  the 
£ 

steps  involving  FALP,  but  with  RIFE  set  to  false. 

Prompts 


(i)  'VIRGIN  RISK  TERMS';  indicates  that  subsequent  nromots 
issued  by  the  adaptive  integration  routines  are 
associated  with  the  calculation  of  rv(t). 

(ii)  'VIRGIN  SURVIVORSHIP  TERM';  indicates  that  subseouent 
prompts  issued  by  the  adaptive  Integration  routines  are 
associated  with  the  correction  term  for  Pg(t). 


COMMON  Variables  Changed 


RLT :  Current  value  of  P_(t). 

£ 


5.6.  Limits  and  Their  Evaluation 


The  discussion  in  Section  5  concentrated  on  the  evaluation 
of  the  integral  expressions  defining  the  reliability  functions, 
in  terms  of  the  evaluation  of  the  nested  sequence  of  integrations 
and  Integrand  functions.  The  logic  diagrams  indicated  the 
processes  involved  to  ensure  that  the  correct  fornBof  the 
various  functions  are  evaluated.  In  these  diagrams,  the  limits 
of  integration  were  given  with  the  appropriate  adaptive  integration 
algorithm  name:  the  code  associated  with  the  evaluation  of  the 
limits  was  not  described. 

The  various  subroutines,  function  sub-programs  and 
code  sequences  used  to  evaluate  the  integration  limits  are 
described  in  this  Section. 

The  description  starts  with  the  process  of  establishing 
the  default  limits  defined  by  equations  (3.43)  to  (3.49).  The 
limits  for  the  outermost  integration  variable,  Sq,  are  then 
discussed,  followed  by  the  (3  and  •£  limits. 


5.6.1.  Default  llmlta 


The  process  of  establishing  the  default  Holts  starts 
with  the  definition  of  initial  values  by  the  input  data.  The 
various  definitions  and  program  variables  used  to  store  the 
Initial  values  are  summarised  in  Table  5.14. 

The  Initial  values  are  gradually  overwritten  as  the  first* 
two  phases  of  operation  are  executed  (Table  5.1).  The  default 
limits,  the  program  variables  containing  the  final  values  and 
the  subroutines  In  which  the  values  are  set  are  summarised  in 
Table  5.15. 

The  following  points  should  be  noted. 

(1)  Primes  denote  initial  values  of  the  variables. 

(11)  As  already  mentioned  in  Section  5.4.1.,  initial  crack 
length,  Sq,  is  used  as  the  integration  variable  for  the 
outermost  integration,  whereas  initial  age,  nQ,  is  used 
to  represent  that  variable  within  the  integrand  functions. 
There  is  thus  a  dual  relationship  between  aQ  and  nQ.  For 
each  limit  defined  for  nQ,  there  is  a  corresponding  limit 
for  Sq. 

Both  sets  of  limits  are  not  given  in  the  Tables  in  which, 
the  limits  are  expressed  in  terms  of  nQ.  For  each  limit 


Symbol 


Definition  of  initial  value 


Name  of 
variable 


1 

aO,min 

Initial  crack  length  density 
(via  RANGE) 

RNOMIN 

1 

nO,max 

Initial  crack. length  density 
(via  RANGE) 

R NOMAX 

ort  Input  value  of  RHO  (CNO)  ' 

%  1 
*i 

First  node  of  a(t) 

RNI 

fcf 

Last  node  of  a(t) 

RNF 

i 

Specified  value 

or,  last  node  of  Cd(a) 

Rmin 

First  node  of  PL(R) 

R(D 

1 

R 

max 

Last  node  of  PL(R) 

R(M) 

1 

*  min 

Density  for  relative  residual 
strength  via  RANGE. 

ALPMIN 

**  max 

Density  for  relative  residual 
strength  via  RANGE 

ALP MAX 

If  strength  variation  ignored 
etmin**‘max  a 

1 

x1;,  min 

Density  for  relative  fatigue 
life  via  Range 

B! 

(in  BETCNG ) 

1 

X1 ,max 

Density  for  relative  fatigue 
life  via  RANGE 

B2 

(in  BETCNG) 

Table  5. 14.  Definitions  of  and  program  variables  string 

Initial  values  of  quantities  used  to  determine 
the  default  limits. 
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Symbol 

Limiting  operation 

Name  of 
variable 

Subroutine 
where  set 

^jain 

Bax  tV^.minl 

HNOMIN 

CFIN 

and  SETTAB 

nO,max 

01,1  l?f*“0,maxl  • 

RNOMAX 

CFIN 

and  SETTAB 

°SB±n 

min 

ALPMIN 

CFIN 

"Snax 

1 

*<-max 

ALPMAX 

CFIN 

8min 

max  i*min1^  ^f  ^  ’ 8 '  min^ 

R(1) 

STTAB 

Rmax 

min  ("max  >  8  max) 

H(M) 

SETTAB 

\ 

■“t'i.f '‘WSin1 

RNI,  or 

BETA(  1 ) 

SETTAB 

*f 

RNF  or 

BETA(N) 

SETTAB 

»±n&i.f1<?P'k«a x^ 

RND 

ADVNCE 

1/x1,min 

^X1  ,'min 

B1 

(in  BETCNQ) 

CFIN 

via  BETSET 

1y^x1  ,max 

’/xl',max 

B  2 

(in  BETCNQ) 

CFIN 

via  BETSET 

t/x1,miu 

t/x1 ,min 

BETMIN 

BETCNQ 

t/x1,max 

t//x1  ,max 

BETMAX 

BETCNQ 

?  min 

t/x1,min  +a0 

BETMIN+RNO 

ras  required 

Pmax 

-°o 

BETMAX+-RNO 

J 

Table  5.15.  Limiting  operations  invloved  In  establishing 
the  default  limits.  Table  includes  indications 
of  the  sections  of  code  in  which  the  operations 
are  performed. 


U2  9 


thus  expressed,  the  limit  for  initial  crack  length 

can  be  obtained  via  the  crack  length  -  age  relationship, 

a(t). 

In  the  code,  two  sets  of  values  for  the  limits  are  stored. 
The  variable  names  for  initial  age  values  all  start  with 
'S';  those  for  crack  length  start  with  'C'.  For  example, 

CNO  and  BHO  are  the  names  of  the  variables  containing 
the  current  value  of  Uq  and  nQ  respectively. 

(ill)  The  current  version  of  the  code  assumes  that  the 
specified  maximum  for  Sq  is  less  than  ad.  The 
limit  equation  (3*49)  is  not  completely  executed  within 
the  code,  (It  was  not  expected  that  the  analysis  of  a 
population  of  structures  having  initial  crack  lengths 
greater  than  the  inspection  threshold  would  be  a  real 
possibility.) 

(iv)  The  limit  equations  for  x1  are  also  included  although 

these  are  not  strictly  part  of  the  set  defined  by  equations 
(3.43)  to  (3.49) 

(v)  The  default  limits  for  nQ  are  applied  in  two  steps.  The 
first,  in  CFIN,  uses  and  t^  .  The  second,  in  SETTAB, 
uses  t^  and  t^.  Normalisation  of  the  density  function 
for  initial  crack  length  is  done  in  CFIN;  the  implication 
is  that  this  normalisation  is  based  on  the  age  limits  as 
specified  by  aCl). 


J±3o 


5.6.2.  Limits  for  gp  or  aQ 


The  Integration  limits  for  initial  crack  length,  aQ,  are 
determined  for  the  various  reliability  functions  by  specified 
limiting  values  for  initial  age,  nQ.  These  limiting  values 
are  defined  in  Section  3.4.1.  For  a  given  model,  the  limits 
for  all  the  reliability  functions  can  be  reduced  to  a  set  of 
7  values;  n^  n2,  nd1,  nf1,  nf2,  nR1»and  n^.  The-  equations 
defining  these  values  for  all  the  models  were  presented  in  Section 
3.4  and  are  summarised  in  Table  5.16. 


The  limits  for  the  functions  described  in  Section  5.5 
are  determined  by  the  three  values  n^,  n2  and  nd1,  and  are 
evaluated  by  code  in  HSKTOT  which  controls  the  nQ  integrations 
for  rg(t)  and  P^C t)  and  FPDBT  which  controls  the  nQ  integration 
for  P^et^*  values  nf1  and  n^2  are  used  for  the  risk 
of  fatigue  life  exhaustion,  rf(t)  and  are  evaluated  by  code  in 
RSKTOT.  The  values  nR1  and  nR-,  are  evaluated  by  code  in 
FLPRGB  which  controls  the  nQ  integrations  for  the  strength 
functions. 


The  equations  summarised  in  Table  5.16,  rely  on  three 
functions  f  ,  f  (R)  and  s'  „  which  are  handled  in  the  code 

a0  “o  P,H 

as  described  below. 
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Limit 

Full  model  and  constant 
relative  strength 

Constant  rel* 
fatigue  life 

Constant  rel. 
fatigue  life  and 
strength 

n1 

nO,min 

“o.min 

“o,min 

°2 

7 

^K.max- 

“"I" 0 ,„a*  , 

\ 

nO,min 

naxk,m±a’ 

tf-t 

nf2 

®^n  [?0,max* 

“2 

tf-t 

“ai 

“o,min 

maxjn^td't^ 

td-t 

“hi- 

“o,min 

••xin1^p,R-tS 

f^R/R^-t 

“h2 

*“l“o,max’fn0(R)l 

“2 

f "’(R/^Qj-t 

Table  5.16*  Summary  of  equations  for  the  integration  limits 


for  initial  age,  or  initial  crack  length, 


The  function  f  ,  which  is  used  to  determine  nff  for 
a0  r 
the  full  model  only,  is  given  by, 

f  .  (t.t  -  t,ti.)/(t-tij,  (5.193) 

nQ  d  f  j  .  j 

(see  equation  3.78). 

In  terms  of  program  variables,  (5.193)  i»  equivalent 
to, 

f  »  (RND'RNSV  -  RNF*RNIM)/(RNSV  -  RNIM). 
a0 

....  (5.194) 


(ii)  faQCBJ 

The  function  f  (H)  is  defined  by  equation  (3.72)  for 
n0 

the  most  general  model  and  (3*114)  tor  a  model  with 

constant  relative  strength.  For  the  latter  case,  f  (R^n) 

0 

is  the  same  as  f  . 

a0 

This  function  is  evaluated  by  the  function  sub-program 
called  FNOB  described  below. 


The  function  (l'p>R  is  given  by  the  solution  of 
the  equation, 


8«R^((«)/r(fi(nD,jS))  . 


(5.195) 


M3  3 


M  33 


C 


is  returned  as  one  of  the  arguments  of  the 


subroutine  ALPHAP  which  also  computes  tc' 

p»« 


given  by 


*P.R  -  R/r^p.R*  •  (5.196) 

ALPHAP  uses  the  function  FRP* which  evaluates 
the  right  hand  aide  of  equation  (5.195). 


•  r 
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SURPO'JTr*rF  \L»HAP(ALPP,  RFTA ?,'V,  R1  ,  R  2  ) 

Function 

• ALPPAP  finds  the  lower  limit  for  X  for  an  integration  alon» 
the  line  (/S )  t  subject  to  restrictions  on  the  oernissible 

ran?e  of  fi  . 

Parameter  List 

ALPP:<=*  ;  o<.  coordinate  of  the  lower  limit  of  integration. 

T) 

RFTAP:  A  ;  A  value  corr esoond  inq  to  o<  . 

0  T5 

RV:  Value  of  R  for  whicho^  and /S  are  required. 

P  P 

Rl:  Lower  bound  for  /S  . 

p 

R2:  Pooer  bound  for  A  . 

^P 

Operation 

the  values  of  of  and  £  returned  by  ALPHAP  depend  on  the 
P  p 

juxtaposition  of  the  lines  &  and 

°^"Sp/^(^i  (^’  nn>  ^  wt,ere  the  f  unc  tion  (/d.n^)  depends  on  the 

class  of  model.  Por  models  accounting  for  variations  in 
fatique  life, 

n0)  -  n0  +  (>£-  n0)tlj^t  (5.197) 

and  for  those  ignoring  variations  in  fatique  life, 

A1(fi,aQ)  -  fl-  t  +  tij.  (5.198) 

This  function  is  assumed  to  be  available  via  function  FRP(  ) 
which  returns. 


for  qiven /5 


FRP(£>  n0)) 


(5.199) 
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V3* 

The  values  of  and  are  determined  accord  in?  to  the 

P  P 

following  conditions. 

(i)  If  Ro<1,  corresponding  to  PLn<RV,  the  lower  limit  of 
integration  is  determined  hv  -  ^  and  the  returned 
values  are, 

<*p  *  %/HA)  5  m/3\'  <5.200) 

(ii)  If  Rp^^i  )  »  corresoond  in<?  to 

-FRP(^)^R,  the  lower  limit  of  integration  is  ayain 
determined  by  A  • ^  and  the  returned  values  are  the 
same  as  for  condition  (i). 

(iii)  If  Rp/Y'f^  ,n0))V R/^<yfi2  )  ,  correspondin'?  to 

FRP(y5^)>_R,  the  lower  limit  is  on  the  line/5-y<^.  In  this 
case  A  is  returned  as  /S.  but  ©<  is  returned  as 

'  p  2  p 

RpWi(^2  , n  q ) )  which  represents  the  intersection  of 
cX-Rp/^^iC^j.ng)  )  and/5-/^. 

(iv)  Otherwise,  the  limit  is  found  by  solving  the  equation 

R  -  V'(4)Rp/^(41(/5,nn))  (5.201) 

uslnq  FSOLVF  and  appropriate  initial  yuesses. 
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FUNCTION  FNOH(RV) 

Function 

FNOR  evaluates  the  function  f  (R)  used  to  determine  the  upper 

n0 

limit  for  nQ  for  integral  expressions  for  which  the  restriction 
R  *  holds. 

Parameter  list 


RVs  Value  of  R  for  which  f  (R)  is  required. 

“0 


Operation 


The  function  f  (H)  is  defined  by  equation  (3.72), 
n0 


fn0(R)  *  nL*-n  ^§max*  max*  ’  C  t.minit^f" 1  ( Rpf(  ^  ’ ) /R)} 

-  ■*»$?'»  n«4f 1  ( R/*<-nln)  '  ^ 1  ( Rf(  V/RpVmin5)t:L  j] 

/(t-tij)] 

....  (5.202) 

where 

f  -  min\tfl  £max»f 1  W+max))  (5.203) 

or,  if  4ia  constant  equation  (3. 114), 

f  (R)  ■  minty-1(R/R0),(£dt-  f^R/S^ti^At-ti^))  . 

....  (5.204) 

If  there  have  been  no  inspections,  or  tati^,  equations  (5.202) 
and  (5.204)  are  replaced  by, 

fn  (R) »  fi‘. 
a0  r 


(5.205) 


y 


FinCTIOV  FPP(APC) 
Function 


FPP  evaluates  the  Cunc'tion 

f  (fi)  -  ’tf/6)/f(41(/5,<i0))  (5.206) 

which  ia  used  to  determine  the  lower  limits  of  integration 
alon^  the  line  . 

Parameter  List 

APG:  Value  of  /&  for  which  the  function  is  reoulred. 
Operation 

The  function  ^(^.n^)  depends  on  the  status  of  the  PETO  OM 
switch.  If  PKTCOV».rALSE.  , 

f(/5)  -  5)/^(n0  +  (/S-n^tij/t)  (5.207) 

and  if  PETCON-  .TPUE., 

f(/S)  -  ^(jS)/f(.A-  t  +  ti  >. 

If,  in  the  latter  case,  /$>  Cf  +  t  -  clj*  f(/5)*0. 


(5.208) 
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5.6.3.  Limits  for  g 

The  limits  for  3  are  given  in  the  integral  expressions 
listed  in  the  tables  of  reliability  functions  described  in  this 
Chapter  (e.g.  Table  5. 10  for  Pp(t)).  The  limits  depend  on  various 
functions  which  were  defined  in  Section  3.3.2,  (see  Table  3.3). 
The  methods  by  which  these  functions  are  evaluated  are  described 
below. 

(i)  t*(R) 

The  upper  limit  for  an  integration  over  '  p  is  expressed 
in  terms  of  t.p(R),  where 

“ini  V  ^  max’  f (RAt  max^  * 

...  (5.209) 

minltf,  (Jd(n0),^max5  *  ( 5.210) 

The  function  ?d(n0)  is  defined  by, 

-  no  *  (Vn0)tAi;J  (5.211) 

or  «  T .  -  ti.  -  t  if  X  is  constant.  (5.212) 

d  J  -1 

00  ♦ 

The  limit,  f ^ i8  roturne<i  by  the  subroutine 
.BETALM.  t*(R)  can  then  be  recovered  using, 

*f(R)  -  »in{i;(Rmla), 


tf(R) 


For  RmRrnln' 


tf(Rmin) 


(5.213) 
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(11)  &^nQ) 

The  function  ^(n^)  is  given  by 

^(nQ)  »  m«c  ^nQ,  ( 

and  ia  returned  by  the  subroutine  BETALM. 

(iil)  B 

The  function  A  „  is  defined  by, 

rp,« 

tp,B  z  Baxty  1cR/‘<min)»  Pp,R*WnO*\* 

Subroutine  ALPHAP  is  used  to  obtain  fl'  _  and 

Pflt 

equation  (5.215)  i*  then  applied  to  yield fi'  n.  (see 
description  of  FLDRO)# 


.214) 


(5.215) 


SUBROUTINE  BETALM(B 1 ,B2) 


Function 

BETALM  evaluates  the  functions  ^(ttg)  and  whlcil  an® 

used  to  determine  the  integration  limits  for  fS . 

Parameter  List 

B1:  Lower  (1  limit ,  ^(nQ). 

B2:  Upper  (l  limit,  t*(Rmit|). 

Operation 

(i)  Models  which  include  variations  in  fatigue  life. 

For  given  initial  orach  length,  aQ,  or  initial  age,  nQ, 
^(ng)  is  defined  by  equation  (5.214) ,  so  that 

B1  =  MXiao»*min’*J'  (5.216) 

For  a  given  value  of  time,  BETMIN  contains  the  minimum 
value  of  t/x,  so  that  $m±n  is  given  by, 

(8  min  *  ao+(t/x1)min 

s.  RNO  *■  BETMIN  (5.217) 

For  positive  (t/x1)B±n,  B1  is  thus  given  by, 

B1  *  max  [rNO+BETMIN.RNI^ 

AMAX1(RN0*BETMIN,RNI).  (5.218) 

The  upper  limit,  ^(R^^),  is  given  by  equation  (5.210), 
so  that,  neglecting  previous  inspections, 


B2  x  AMXN  1 ( BETMAX+RNO , RNF) 


(5.219) 


If  inspections  are  included, 


B2*  Bin  (B2,£d(n0)^  (5.220) 

where  B2  on  the  RHS  has  been  evaluated  using  (5.219). 

Equation  (5.220)  leads  to, 

B2  -AMINl (B2.RN0  +•  (RKD  -  RNO) *RNSV/RNIM). 

.  (5.221) 


(ii)  Models  with  constant 


If  x1  is  constant,  there  are  no  integrations  overf. 
However,  the  function  ^(R^^  is  still  used  to  set 
some  of  the  at limits.  BETALM  has  been  written  to  return 
sensible  limit  values  for  such  models. 

B1  is  set  to  t^  as  given  by  RNI. 

Without  inspections, 

&  »  (5*222) 
so  that  B2  is  returned  with  the  value,  RNF. 

If  there  have  been  inspections, 

*f(IW  ' 

*  minjjf,  td-ti3+tj  ,  (5.223) 

so  that 


B2  *  AMINl  (RNF,RND-RNIM4-RNSV)  (5.224) 


5.6.4.  Limits  for  u 


The  Integration  limits  for  depend  on  the  functions 
«<-2((*,R),  and  defined  in  Section  3.3.2  and 

listed,  for  reference  in  Table  3.3.  Typical  code  sequences 
for  their  evaluation  are  described  below. 

(Qot^g.B). 

The  equation  defining  «t2(g,R)  is, 

*2(g,H)  a  alaC^.R/f^ 

which  leads  to 

*2(e,KBin)  «  AMIH1(ALPMAX,R(  1)/PSI(BETV)) 
in  FBET,  or 

*2(  *f  ^min5  ^min*  *  ^MlK*1®**4****  1  )/PSI(RFBET) ) 

.  (5.227) 

where  RIBET  has  been  set  to  t^R^^,  ln 

In  FRVO,  <^(.0,R)  is  given  by, 

^2(0,R)  «  AMINK ALPMAX,R(M)  )  (5.228) 

(ii)  ^*(nQ.f) 


(5.225) 


(5.226) 


The  equation  defining  «c*(n(},(l)  is 


*4 3 


....  (5.229) 

Remembering  that  the  function  FRP((3)  returns  the 
function 

FRp(^)  *  *  (5.230) 

the  third  term  in  the  curly  brackets  in  (5.229)  is  given 
by  FRP(?)/y(p)  and  the  FORTRAI  equivalent  of  (5.229) 
is, 

tZ  ( nQ , £ )  = AMAX 1 ( ALPLOW , R( 1 ) /PSI VAL , FRP (BET V) /PSI (BET  V)  ) 

...  (5.231) 


The  lower  limit  for  the  virgin  risk  oc  integration  is 
given  by 

%  *  (5.232) 

which  is  evaluated  by, 

«£y  -  AMAX1(ALPMIN,R(  1)  ,PLD)  . 


(5.233) 


H-*  H- 


5.7.  Risk  of  Fatigue  Lj  t»  Emanation 

The  risk  of  fatigue  life  exhaustion  is  gives  by 
equation  (3.85) » 

-a(nf2) 

rf(t)s]  (*ff1(t  »aQ)  ♦  Pff2(t,n0)j  PaQ^ao)dao 

a(nft5  ....  (5.234) 

together  with  equations  (3.97),  (3120),  (3.139)  and  (3.163). 
for  Pff1(t.nQ)  and  (3.98),  (3. 121), (3. 140)  and  (3. 164)  for 
pff2(t,n0)  for  the  various  classes.  These  equations  are 
summarised  in  Tables  5. 17  and  5. 18. 

The  evaluation  of  the  term  r^(t).Pg(t)  follows  the 
logic  shown  in  Figure  5.26.  The  operations  above  the  FRPO 
control  point  are  executed  by  code  in  RSKTOT. 

Note  that  integrations  over*  occur  only  for  the  case 
of  the  full  model.  If  one  of  *or  (3  are  held  constant, 
rf(t)  is  reduced  to  a  single  integration  over  aQ.  If  j 

both  *.  and  ^  are  held  constant,  rf(t)  is  given  by  a  point 
evaluation  of  the  integrand  at  a  value  of  aQ  which  depends  *j 

on  the  constant  values  of  *  and  &  and  the  current  value  of  t. 

il 

The  function  hierarchy  is  shown  in  figure  5.27.  q 

il 

D 

fl 

1 


Class 

Full 

S(tf>^*(Bill<tt))p^(Tg)(tf-nD)|  p^C^jH^tt^nQ.Odac 

t  J  • 

ot(n0,tf) 

«*•  Coast. 

0 

11  Const* 

/Saax 

J  **<%-*•  V 

•c  and  X1 

Const. 

0 

Table  5.18.  Summary  of  expressions  for  Pff2^t,n0^* 


Figure  5.26.  Logic  •••ocieted  with  the  evaluation  of  rf(t). 


Figure  5.27.  Hierarchy  of  function  auto-progrma  ua«d  for  tho 
•valuation  of  r^Ct). 


H-H-  9 


ffJM 


FU’ICTtO'J  FRFO  (ARC,  ERROR  1  ) 

Function 

FP.FO  evaluates  the  tern 

T(a0)  -  [Pao<V]  (Pffl(t*nO)  +  pff2(t‘n0))  (5.235) 

which  is  used  as  the  a^  integrand  for  r^(t). 

Parameter  List 

ARG:  Value  of  a^  for  which  the  function  value  is  required. 

ERROR  1 :  Error  estimate  returned  by  FRFO  and  representing  the 
error  attributed  to  any  integrations. 

Operation 


PT,F0  controls  the  logic  between  the  control  points  F^FO  and 
FRF  1  or  FRF 2  in  Figure  5.2fcand  consists  of  two  sections  of  code. 
The  first  evaluates  ;  the  second  evaluates  Pff2^C,n0^* 

In  each  section,  the  form  of  the  integrand  depends  on  the 
states  of  the  switches  ALPCON  and  BETCON  as  outlined  below. 

( 1)  First  section  p^^Ct) 

full  Model 

The  calculation  of  p^^ft)  for  models  with 

variations  in  •<.  and  X.  included  involves  an  integration 

“X 

over<  i  which  is  made  in  thhe  usual  way  using  ADAPT2  and 
FRF1  as  an  Integrand  function. 

The  upper  ec  limit  is  calculated  by  direct 
application  of  equation  (5.227)* 


)?  is  calculated  by  the 


c 


c 


the  lower  limit,  *Bln/r<^,R 

K  min 

subroutine  ALPHAP.  Note  that  the  call  to  ALPRAP 

restricts  the  possible  solution  for  0  _  to  the 

p*  min 

interval  ,e*f  <*nln>l  • 

OCConstant.  ft  Varying 


If  tC  is  constant,  '(t,n0)  is  given  by 
PffjCt.ng)  -  p^(  tf  )  (  t’j-ngJlHRg,  tf  ,n0,  t ) /t  (5.236) 


*  m 

and  exists  only  when  t.(R  .  )>t-. 

r  tn  in  —  t 

Provided  RPBET>RNF,  the  term  is  given  by 

pffi(t,no)  "  pt,RTA(RNF)*(RRP-*N0) 

*(EXP1(-RNSV*GVAL(ALPV,RNF)).  (5.237) 


qlVarying,  ^Constant 

If  ft  is  constant  and  lies  in  the  interval  [t^.t^), 
Pf  f  1  ^  C  ,tln)  *s  C^e  only  Cer,a  t*13!  exists  and  is  given  by, 

Pffl(t,n0)  “  V(*OHU,£*t,0’t)Rninf  ((5)/y>((5)2 

a. 

-  PALPH A ( ALPV )*  R ( 1 ) *P S IDE V (BET V) / ( PS  I  ARC ) 

•EXP(-RNSV*GVAL(ALPV,BETV))  (5.238) 

wh  ere 


«6  -  ALPV  -  *mln/f(£>  -  R  C 1  )  /PS  I  (BETV)  (5.239) 

and 

ft  -  BET V  -  n0  +  t  «  RNO  +  RMSV.  (5.240) 

li  Constant ,  fi  Constant 

for  a  model  with  both  K.  an'’  0  constant,  the  rf(t) 
term  exists  only  when  (RFBET_>RNP)  and  nQ  - 

?f-t,  (BETV"PNF).  The  tern  is  then  given  by. 


1 


I 


4*"/. 

pffl(c,nO)  “  H<R0,Pf ,Pf"c) 

-  EXP1  (-RNS V HCVAl ( AlPV , BETV ) )  (5.241) 

where  ALPV  and  BETV  have  been  set  to  the  values  and  "t^ 
respectively  prior  to  the  evaluation  of  r^Ct). 

If  the  model  allows  for  variations  in  n^,  the 
answer  is  multiplied  by  ds^/dn^,  given  by  CRKD£V(RNO ). 

Cii)  Second  Section.  n^.Ct.n^) 

pff2(t,n0)  exists  only  when  )£' tf , 

(RFBET>RNF)  and  consists  of  an  integration,  using 
Ah  apt  2  ,  of  VRF  2  over*. 

The  lower  Unit,  *C(ng,t"^)  is  evaluated  using  the 
definition  equation  (3.52), 

-  AWAX1 (ALPWIN,R(1 ) /PST (RNF) ,ALPP)  (5:.2I*2) 

where  AT-PP  (■«*  )  has  alreadv  been  returned  a  nrevious 
P 

call  to  ALPHAP.  The  logic  in  M.^'U’  ensures  that  ALP° 

will  contain  the  correct  value  of  at  which  reoresents 

p 

the  intersection  between  the  R  .  boundarv  and  the  line 

m  in 


Following  the  integration  of  FRF?,  the  factor 
(*f  Htf-n0)/t  is  included,  if  ^  is  not  constant,  to 
complete  the  evaluation. 


■?TT'f  *  T  ■£  O  **  **»  ?  1  (  4  ^  ) 

?T,"1  evaliiacts  this  inca-*rnnd  for  che  first  re(t)  car-:.  Til* 
cam,  which  is  evaluated  ooh  '.’hen  tC  an  1  0  ara  ’ioC’  frs»  co  vary 
has  cha  far*?,  (see  e-vt acton  (3.',7), 

t(«t>  -  (f*  -  nn)njt(-c)'-»(<lp*,nfl,c)o^(^)  (S.2U3) 

wKet  e  $*  m  f’l(”nin/<)  •  C-S“.2A4) 

°arar;ecer  Llsc 

A. h r- :  ”alue  of  «<  for  which  che  integrand  com  is  co  '->« 
evaluated . 


Operation  . 

The  local  variable  ts  used  co  score  p  which  is 

conduced  f r on  che  value  of  «4  oassed  inco  **1*1  via  'nr|.  jf 
* 

p  <:n„  ,  a  value  of  taro  is  returned  for  che  integrand. 
Otherwise  che  terra  13  evaluated  ustnt  the  functions  anJ 

for  o^C*.)  and  pg(^)  rasnectively  with  d’Ml  bein-  used  to 
evaluate  the  loss  factor,  H(**,p  ,n^,t)  if  required,  (as 
indicated  by  the  switch,  ?<v>T.hd). 

Graphics  Operations 

TITST?  is  called  to  store  the  integrand  evaluation  if  an 
outer  ince'iand  plot  i3  to  be  constructed. 
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Tun c  t  ion 


~T,r'?  evaluates  the  intenrond  function  for  the  seeoa-!  rf(t) 
ter-'.  This  function  *' n  s  the  ,ot"', 

■’*«)  -  (A,Tf  ,n^,t)  .  (5.245) 

’araneter  list 

i.p.f :  (,alue  of  for  for  which  the  integrand  function  Is 
required  . 

Operation 

Tehe  code  In  F” r  2  evaluates  the  ter"  In  a  straightforward 
nanner  with  the  los3  factor,  "(•<.,  t  f  ,  nn  ,  t  )  he  inn  onltte'*  when 
losses  frtn  the  population  are  ne’lecte-'  . 


Or  a nhics  Operations 


hi T i?”  is  called  to  store  the  evaluation  for  SUhsenuent 
construction  of  an  outer  integral  plot  if  required. 


5.8.  Strength  Distributions 


In  Section  5.2.3. »  the  organisation  of  the  code  in  FLPBOB 
which  controls  the  evaluation  of  the  strength  related  functions 
was  described,  these  functions  are;  p^Cfilt),  Pg(Bit)  and  E(Blt), 
the  density,  distribution  and  expedted  value  for  the  falling  load, 
and  Pg(B  I  7  >t),  PgCB  l  F  ?t)  and  S(B  |  F  ?t),  the  density,  distribution 
and  expected  value  for  strength. 

the  docusentatlon  for  FLPBOB  presented  in  that  Section 
described  how,  for  a  given  value  of  time,  the  density  functions 
are  evaluated  for  a  series  of  values  of  B  and  are  then  integrated 
over  B  by  trapezoidal  integration  to  yield  the  distributions  and 
expected  values. 

this  Section  is  concerned  with  the  code  which  evaluates 
the  two  density  functions.  Most  of  this  code  is  located  within  the 
00  LOOP  which  terminates  at  statement  100  and  sweeps  through  the 
set  of  B  values. 
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5.8.1.  Probability  density  for-  strength 

The  density  function  for  strength  is  given  by  equation 
(3.87),  i.e., 

aCn^) 

Pr(r\  F>t)--  1  fB(H,t,n0)p  (a0)da0  /  Pg(t)  (5.2^6) 

*  •  ‘ 

together  with  equations  (3.99),  (3.122),  (3. 141 )  and  (3.165)  which 

define  fR(R,t,n0)  for  the  various  classes.  These  equations  are 
summarised  in  Table  5. 19. 

The  evaluation  the  tern  Pg(R  l  F>t).Pg(t)  follows  the 
logic  shown  in  Figure  5.28.  The  operations  above  the  FLDHO 
control  point  are  executed  by  the  code  in  FLPROB. 

The  result  of  this  calculation  is  stored  in  the  local 

variable,  TERM.  It  is  converted  to  Pp(R  I  F  >t)  by  dividing  by 

Pc(t),  which  is  stored  in  RLTDS(J),  the  value  of  which  was 

X, 

computed  during  the  construction  of  the  time  sequence  of  reliability 
functions  and  was  stored  by  the  subroutine  ADVNCE. 

Note  that  integrations  over ^  occur  only  in  the  case* 
of  the  full  model.  If  either  oc  or  is  constant,  then 
fB(R,t,nQ)  becomes  a  point  evaluation  for  a  value  of f  which 
is  determined  by  ng  and  which  ever  of  «cor  is  constant. 


|V 


If«.4£g  X1  are  held  constant,  then  the  only  meaningful 


-frf 


calculation  is  one  for  which  nQ  is  varying.  FLPROB  tests  for 
the  possibility  that  all  random  variables  are  held  constant 
for  which  case  no  strength  calculations  are  made.  The  correct 
form  of  PS(R  |  F  >  t)  for  the  case  of  nQ  varying  and  the  other 
two  random  variables  held  constant  is, 

PH(R|  £  >  t)  a  fH(Bft.n^)p  (n0)/PsCt) 

0  — 

a  fE(Rtt,n0)p  (a^daQ  /Pg(t)  .  (5.247) 

The  function  FLSBO  multiplies  the  function  given  in  Table  5. 19 
by  the  factor  dag/dng  to  meet  Aquation  (5.247). 

The  code  in  FLPROB  associated  with  the  evaluation  of 
PE(R  |  F  pt)  is  combined  with  code  associated  with  the  evaluation 
of  pp(R|t)  since  both  functions  are  evaluated  concurrently. 
Examination  of  the  code,  in  conjunction  with  Figure  5.28  should 
Identify  the  appropriate  sections  of  code. 

The  function  sub-program  hierarchy  associated  with  the 
evaluation  of  the  density  for  strength  is  shown  in  Figure  5.29. 


I 


i 


,  I 

I  1 
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Figure  5.29.  Function  sub- program  hierarchy  for  the  evaluation 
of  Pp(R  I  F  ?t). 
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Ho 

^ ’TV  C  **  T  ^  *T  nuc  °  l  (  V*trr) 
ruae cion 

"0311  evaluates  the  integrand  of  the  expression  for 
,  i«e.  a  function  of  the  forn 

5(f)  -  )”<(^/f(p)>H(S/f(p),p,a0,t)/r(#)  .  (5.248) 

Parameter  List 

A.?.Os  Value  of  ^  for  which  the  integrand  is  required. 
Operation 


The  evaluation  of  the  integrand  is  straight forward  ani 

requires  no  eonnent  other  Chan  the  fact  that  the  value  of 

is  checked  to  ensure  that  it  is  not  :ero. 

’Srror  >• 

essate 

(i) 

'CV’OV.  t”  ...  ?<5t  zno':  the  value  o  f  |J 

in  a  sero  value  for  ^  .  "urther  oneration  of 
prevented . 

results 

"VV-  is 

C0,r,’O'T 

Variables  Chanted 

PCTV: 

Current  value  of  £ . 

?SIV\L: 

Current  value  of  . 

*4/ 


FUNCTION  FLOROURG,  ERROR  1) 
Function 


FLnRO  evaluates  the  tera,  fR(»,t ,n0>  I ] 
evaluate  pR(R|F>t). 

Parameter  List 

ARGs  Value  of  Initial  crack  length,  a<j,  for  which 
of  the  function  ia  required. 


used  to 


the  value 


ERRORli  Error  estimate  returned  to  the  calling  code  and 
representing  the  effects  of  any  integrations  used  in 
the  evaluation  of  the  function. 


Operation 


The  code  in  FLhRO  controls  the  logic  between  the  control 
points  FLhRO  and  FDSR1  in  Plgure$.28  and  is  divided  into  two 
sections.  The  first  section  evaluates  the  contribution  fron 
cracked  structures.  The  second  section  accounts  for  uncracked 
structures  when  appropriate. 

( i)  Cracked  Structures 
Full  Model 

For  the  full  model  which  accounts  for  variations  in  «t 
and  Tj,  the  contribution  from  cracked  structures 
consists  of  an  integral  term  which  is  evaluated  using 
A0APT2  to  Integrate  FDSR1  over  # . in  the  usual  way. 

The  upper  limit  of  integration  is  giveh  by 
B2  -  t*(R) 


AMIW 1 (B2,BRKtOH ) , 


(5.249) 


It4>z 


where  ”?  has  been  oreviously  cvaltintd  by  (which 

returns  NS-t^P  .  )  and  **"!'!»?  has  been  evaluated  by 
r  r  in 

the  calling  cole  and  contains  the  value  of  ^  (R^C*,^)  • 

Constant  «C  .  Varying  ^ 

If  aC  Is  constant  the  tern  for  uncracV.ed  structures 
Involves  no  Integrations'*  Given  »,  ^  Is  effectively 
determined  as  ^"'(H/Rq),  where  £Q  is  stored  is  ALPV.  The 
required  expression  contains  the  factor 

Uf)  -  (5.250) 

which  can  be  evaluated  by  the  code  calling  FLhRh  and 
stored  In  CONTI*  To  complete  the  evaluation ,  fLMO 
needs  only  to  Include  the  loss  fsctor-lf  required  so 
that  the  contribution  from  cracked  structures  can  be 
written  as 

FLOR0(a.o)  -  C0NT1«EX?1  (-RNSV*GVAL (AtPV.BFTV) ) 

...  (5.25D 

Constant^  *  Varying  «i 

If  Xj  is  constant,  f  is  fixed  (for  given  nQ  and  t)  at 
n^  +  t.  If^<Tj,  then  FL^RO  consists  of  a  contribution 
from  uncracked  structures  only.  This  'virgin'  term  Is 
evaluated  for  this  class  of  model  by  the  first  section 
of  code  in  FV'RO  and  is  given  by 

fR(B|t,n0)  -  pft(R)exp{-rl(R)t\ 

-  PALPNA(R)s  1T®1  (-RNSV  RLOATJV)  (5*252) 
where  RLOA^V  has  been  evaluated  by  the  calling  code* 

If  0 the  only  contribution  to  PLBRO  is  from 
cracked  structures  and 

/ 

fR(R,t  ,n0)  -  Ptt(A)R«,n0+t,n0,t)/f  (n„+t) 


U&3 


-  PALPHA(ALPV) /PSIVAL 

A  EXP  1 (-RNS  V*GVAL (ALPV , BETV) ) 

...  (5.253) 

where  X.  -  ALPV  -  R/f(^>  -  RVAL  /PSIVAL 
Constant  «C  and 

An  evaluation  for  i  model  with  «c  and  (5  constant 
occurs  only  when  £»t+ng“  f  1  (R/Rg)  •  If  f  <t^, 

For 

fR(R,t,n0>  =  KRQ^.nQ.tJ/CH^'c^JJ.di^/dnQ 


c  1 /ALP  V/PSI  DEV( BET  V  )  *CBKDE  V(RNO) 

*  EXP  1(-RNSV.*OVaL(  ALPV, BETV)) 

...  (5.254) 


( 1 1 )  Hncracked  Structures 
% 

The  second  section  of  FLhRO  is  executed  for  models 
which  do  not  have  constant.  Each  time  RNSV  changes, 
P  p  C  )  Is  evaluated  usin<;  ADAPT2  to  Integrate  PBETA 
over  (J  .  ^or  a  model  with  *c  constant,  the  tern  Is 
completed  by  evaluatin';  the  loss  factor,  R(R,  *  ,n0.t) . 
Tor  models  wl th  <.  varying  the  density  function  p*_(R)  Is 
also  Inc lud  ed  . 


The  failure  density  for  strength  is  given  by  equation 


(3.88),  i.e., 


pH(K, t) 


ra(nR2} 

CfR^R,t,n0^r2^  +  fR,£2 

'a(ngj) 

S(R»Rmin)pff1 


(H,t,n0) 

(t,n0)j  p^aoJdaoAF^tMt)) 


(5.255). 


The  only  new  function  in  (2.55)  is  *r,  f2^R*  t,D(p  whicb  is  defined 
by  equations  (3.100),  (3.123),  (3.143)  and  (3.166).  These 
equations,  which  are  .  zero  for  the  nodels  in  whichecis 
constant  are  summarised  in  Table  5.20. 

The  logfc  associated  with  the  evaluation  of  fR,f2^R,t,n0^ 
is  shown  in  Figure  5.30.  The  function  sub-pro  gras  hierarchy  is 
given  in  Figure  5.31. 

The  tera  pff1(t,nQ)  can  be  handled  separately  by  taking 
it  out  of  equation  (5.255)  thus, 

f  a^nR2^ 

Tf  *  l  Pff1(t*a0J  P«0(aO)daO/pS(t)r(t)'  (5>256) 

Ja(nR1) 

which  is  to  be  evaluated  for  tern,  T^. (P^(t)r(t)) 

can  be  evaluated  using  the  code  used  to  evaluate  r^(t).P^(t), 
provided  the  contribution  aade  by  p  f^t,nff)  is  omitted  from 


the  calculation, 


4-66 


Figure  5.31.  Function  sub-program  hierarchy  associated 
with  the  evaluation  of  the  fR  f2(R,t,n0) 
contribution  to  pR(R\t). 
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The  variable  NTEEM  provides  the  facility  of  'turning  off 
the  Pff2^t,ao^  coatrifcufcLon  in  FHFO.  If  NTKHK  la  set  to  1,  the 
Pff2(t,n0)  logic  in  Figure  5 .26  is  bypassed. 

For  the  case  R  sEnin»  the  avaluation  of  the  term 
Tf.Pg(t)r(t)  replaces  the  term  resulting  from  fg  ^(H.t.ng). 
The  result  of  either  calculation  is  stored  in  the  variable 
TRMRF. 


At  the  completion  of  a  single  pass  through  the  IX}  LOOP 
that  sleeps  through  the  R  values  (in  FLPROB)  the  variables 
TERM  and  TRMRF  have  the  following  values; 

a(nR2> 


TERM: 


fR(H»t»B0)P a«(a0)da0 


a(aRl) 
aCn^) 

TRMRF,  fRtf2(R,t,n0)PaoCao)<iao 

*(  ^R 1  } 


(5.257) 


(5.258) 


or  if  R  ,R_.  , 


min’ 
/■ainR2) 


TRMRF* 


*■(  nH  1 5 


P,fl(t,no)Pao(a0)daO 


(5.2 59) 


so  that  Pp(Rjt)  is  given  by 
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pR(Blt)  a  (TSEM*r2CH)-t.TaOlF)/CPsCt)r(t)) 


=  CTEIM*RLOAD(B)  4.THMHF)/BSLTDS(J)  (5.260) 

where  RSLTDS(J)  contains  the  value  of  Pg(t)r(t)  which  was 
computed  during  the  construction  of  the  time  sequence  of  reliability 
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^LhvP  evaluates  the  function  o  e.J(",.t,u^)  which  is 

ln  ■  •  1  - 

used  to  confute  the  contribution  to  on(n.|  t)  ■naie  by  r*(t)  tyns 
failures  • 

haraneter  List 

AhO;  Value  of  intial  catek  length  a^  for  which  tbe 
evaluation  is  required. 

operation 

VL’V'T  is  used  for  only  two  classes  of  node! .  tn  eacv>  can 
the  function  contains  the  factor  p^C^J/^Ct^Jvhich  is  evaluate! 
by  the  calling  code  an!  ato  red  tn 

?rior  to  the  evaluation  of  the  f unc tion;  t , (1 )  is  evaluate! 

,  the  .  FLDFO  ..  is  returned  with  a  :ero  value. 

-  ch'TT2*f:x?l  (-v!cv*o"/a(AL®v,°v?)  ) 

...  (5.261) 

or 

-  C0VT2  *®WT\(0w^)*(V’O'-vW)/HftSV 

yy»  l  (  AL”V  ,  VW)  ) 

...  (5.262) 

if  ^6  is  not  constant. 

CQT'ov  Variables  Chanced 

r.'!0:  Current  value  of  n0. 


and  if  less  than  tf , 
Otherwise  either 

if  f  is  constant , 
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5.9.  Basic  Cq"«»n;f  ft^tioas.  Input-Output  Procedures  and 
Mathematical  Functions 

The  computer  code  described  to  this  stage  has  been 
concerned  primarily  with  the  evaluation  of  the  reliability 
functions  or  the  operation  of  the  various  numerical  algorithms. 

There  are  several  subroutines  and  function  sub-programs  that 
provide  basic  comaunl cations  facilities  and  other  essential 
requirements  for  the  program's  operation.  Those  subroutines 
are  described  in  this  Section. 

5.9.1.  Communl cations 

SERF  can  operate  in  two  modes,  'Interactive1  or  'batch'. 

In  the  interactive  mode,  a  dialogue  appears  on  the  remote 
terminal  or  visual  display  unit  ( VDC) .  This  dialogue  contains 
prompts,  error  messages  and  requests  for  user  responses 
necessary  to  select  optional  facilities  as  the  run  proceeds. 

In  the  'batch*  mode,  these  messages  are  suppressed  from  transmission 
to  the  VDU  but  most  appear  on  the  secondary  output  file. 

ill  prompts  and  messages  pass  through  the  subroutine  PROMPT 
which  can  detect  the  mode  of  operation  and  process  the  messages 
accordingly.  Requests  for  user  responses  also  pass  through 
basic  communications  subroutines  ( XKTEST,  INTOXN,  REAL IN  and 
TXTXlf)  which  use  PROMPT  to  channel  the  messages  as  appropriate 
as  well  as  providing  a  standard  format  for  the  requests  and 
subsequent  resonses. 
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The  greater  hulk  of  the  code  in  HERF  therefore  containa 
no  direct  input-output  statements  (such  as  REAL,  WRITE,  TIPS 
and  ACCEPT)  and  is  independent  of  the  commundatlons  facilities 
provided  by  the  computer  system  on  which  SERF  is  installed. 

Changes  to  those  facilities  can  be  accommodated  by  making  a.  few 
changes  to  the  communications  routines  rather  than  changing  the 
whole  code. 

The  fadlites  provided  by  the  communications  routines 
are  described  below. 

(i)  Text  string  output  (PROMPT) 

A  prompt  or  message  consists  of  a  text  string  containing 
a  specified  number  of  characters.  To  transmit  a  message 
to  the  terminal  and  secondary  output  file,  a  call  to 
PROMPT  is  made,  e.g. 

CALL  PRO MPT ( 'THIS  IS  A  MESSAGE' , 17). 

(ii)  Echo  of  user  response  (ECHO) 

A  response  entered  on  the  terminal  is  read  by  the 

code  in  the  routines  REALIH  and  TXTIN  (the  only  subroutines 

in  HERF  that  accept  user  responses)  as  a  text  string. 

ECHO  provides  a  facility  for  transmitting  an  echo  of 
the  response  to  the  terminal  and  to  the  secondary  output 


file 


In  the  current  installation  on  the  DEC  SYSTEM- 10  at 
ARL  there  is  no  need  to  echo  the  response  on  the  terminal 
and  the  response  is  transmitted  to  the  secondary  file  only. 
This  version  of  ECHO  does,  however,  interact  with  PROMPT 
by  adjusting  the  first  character,  which  is  always  a 
'control*  character,  sent  by  -  PROMPT  so  that  the  effect 
of  a  linefeed  echoed  by  the  system  following  a  user 
response  is  suppressed. 

(iii)  Text  string  input  ( TXTIN) 

Subroutine  TXTIN  is  intended  to  provide  the  facility 
for  prompting  and  accepting  a  user  response  consisting 
of  a  string  of  characters  that  will  be  interpreted  as  text. 
The  call  is  of  the  form, 

CALL  TXTINOFILE  NAME?' ,  10,ANS,  1) 

where  the  text  string  containing  the  prompt  and  the 
number  of  characters  in  that  string  constitute  the 
first  two  parameters  in  the  call.  The  user's  response 
will  be  returned  in  the  variable  ANS.  The  last  parameter 
indicates  the  number  of  words  allocated  for  storage 
of  the  response. 

(iv)  Real  number  input  (RSALIN) 

REAL IN  provides  a  similar  facility  to  that  described 
above  when  the  user's  response  is  to  be  interpreted 
as  one  or  more  numbers. 
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All  pro ceasing  of  the  response  to  form  the  numbers 
Is  handled  by  REAL  IN  which  contains  provision  for  the 
construction  of  lists  of  numbers.  (See  documentation  below. ) 

(v)  Integer  number  input  (INEGIN) 


INTGIN  provides  a  similar  facility  to  that  of  RE ALIN 
but  for  integer  numbers.  IOTGIN,  in  fact,  calls  REALIN 
so  that  user  responses  for  all  numbers  are  the  same 
and  are  converted,  when  appropriate,  by  the  code  in 
INTGIN. 

(vi)  Logical  input  (INTEST) 

Often,  the  user  is  asked  to  select  between  two  alternative 
options  and  is  asked  to  reply  'yes'  or  'no'  to  a  suitable 
question.  INTSST  provides  this  facility.  Por  example 
a  statement  of  the  fora, 

IF(INTEST( 1  DO  THIS?', 10))  00  TO  10 

will  result  in  the  prompt  '00  THIS?'  appearing  on  the 
screen.  If  the  user  replies  'US'  or  'Y'  a  jump  to 
statement  10  will  be  executed.  Otherwise  control  will 
pass  to  the  next  statement. 


Further  details  of  the  operation  of  the  coamuni cations 


i 
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routines  are  given  below, 


SUBROUTINE  ECHO (TXT , NCH ) 


Function 

ECHO  transmits  a  text  string  to  the  secondary  output  file 
only.  It  is  intended  that  ECHO  is  used  to  transmit  keyboard 
entries  only.  However  there  is  no  coded  test  to  prevent 
alternative  use. 

Parameter  List 

TXT:  Array  containing  the  text  string  to  be  transmitted. 
NCH:  Number  of  characters  in  the  text  string. 

Operaton 


ECHO  operates  in  a  similar  manner  to  PROMPT  in  that  the  last 
word  in  TXT  is  modified  so  that  any  characters  beyond  NCH  are 
replaced  by  blanks  before  transmission.  The  string  is  preceded 
by  a  to  identify  a  keyboard  response  on  the  secondary 
output  file. 

The  first  character  in  PCHR  (in  common  block  BATCH)  is  set 
to  '+'  so  that  the  next  string  transmitted  by  PROMPT  (see 
below)  will  supress  transmission  of  a  new  line. 
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LOGICAL  FUNCTION  INTEST (A, NCH ) 

Function 


INTEST  returns  a  logical  value  of  true  or  false,  depending 
on  whether  the  operator  has  entered  'yes'  or  'no'  on  the 
keyboard  from  which  NERF  is  being  operated. 

Parameter  List 

A:  Array  containing  a  text  string  which  will  Invite  the 
operator  to  make  the  required  response. 

NCH:  The  number  of  characters  in  the  string  stored  in  A. 

Function 

INTEST  uses  TXTIN  to  input  the  opertor's  response  to  the 
prompt  stored  in  A.  This  respose  is  checked  and  INTEST  set  true 
if  'YES',  'Y'  or  'T'  has  been  entered.  INTEST  is  set  false 
otherwise.  Note  the  response  must  be  upper  case.  The  response 
'T'  is  permitted  to  ensure  compatibility  with  previous 
versions  of  NERF  which  requested  a  true  or  false  answer 
directly. 

Prompts 

(i)  Prompt  stored  in  A. 
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SUBROUTINE  INTGIN (T  XT  ,  NCH  ,  IVALS  ,  NUM) 
Function 


INTGIN  controls  the  input  of  integer  constants  from  the 
keyboard  of  the  terminal  from  which  NERF  is  being  operated . 

Parameter  List 

TXT:  Array  containing  a  text  string  which  will  be  used  to 
prompt  the  operator  to  enter  data  on  the  keyboard. 

NCH:  Number  of  characters  in  the  text  string  stored  in  TXT. 

IVALS:  Integer  array  into  which  the  constants  will  be 
transferred  by  INTG1N  and  returned  to  the  calling  code. 

NUM:  >0;  The  number  of  integers  to  be  input.  The  number  is 
fixed  and  not  subject  to  variation  by  the  operator  and 
all  the  Integers  will  be  entered  on  the  one  line. 

<0;  The  number  of  integers  is  not  fixed  and  a  series  of 
prompts  will  instruct  the  operator  accordingly. 

*0;  Same  as  above  with  the  maximum  number  of  constants 
set  by  default  to  100. 

Operation 

INTGIN  operates  by  calling  REALIN  to  input  a  set  of  real 
constants  which  are  then  converted  to  integers.  This  means 
that  data  entry  is  free  of  format  restrictions  and  real  numbers 
(e.g.  Ie4  for  1000)  can  be  entered  if  convenient. 

For  further  details  of  the  modes  of  data  entry  refer  to  the 
description  of  subroutine  REALIN. 
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SUBROUTINE  PROMPT  (TXT  ,  NCH  ) 

Function 

PROMPT  handles  the  transmission  of  text  strings  to  the 
terminal  from  which  NERF  is  being  operated.  The  text  is  also 
transmitted  to  the  secondary  output  file  chich  contains  a 
detailed  account  of  the  operation  of  the  NERF  program  and  error 
messages  . 

Parameter  List 

TXT:  Array  containing  the  required  text  string  in  A5 
format . 

NCR:  >0;  The  number  of  characters  in  the  text  string. 

-0;  A  blank  line  is  transmitted. 

<0;  NCH  defines  the  number  of  characters  in  the 
string  which  is  preceded  during  transmission  by  a 
blank  line. 

Operation 

This  subroutine  is  very  dependent  on  the  computer  system  on 
which  NERF  is  implemented.  The  current  version  is  compatible 
with  the  DEC-10  computer  operating  at  ARL  during  1982. 

Transmission  to  the  terminal  is  controlled  by  a  TYPE 
statement;  transmission  to  the  secondary  output  file  by  a  WRITE 
to  logical  unit  number  4.  The  number  of  characters  per  word  on 
the  DEC-10  is  5  which  is  the  value  assigned  in  the  routine  to 
NCRWD.  However  the  code  does  make  the  assumption  in  other 
sections  that  each  word  has  5  characters  and  implementation  on 
another  machine  with  different  word  length  would  require 
careful  reconsideration  of  the  code. 

Prompt  modifies  the  last  word  in  TXT  so  that  any  characters 
beyond  NCH  are  replaced  by  blanks.  This  simplifies  output  to 
the  terminal,  but  does  overwrite  information  in  TXT. 
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1  Transmission  to  the  terminal  is  preceded  by  a  control 

•  character  which  may  be  used  to  effect  line  spacing  control  if 

I  required.  This  character  is  stored  as  the  first  character  in 

FCHR  in  the  common  block  BATCH.  Currently  this  character  is 
)  used  to  supress  a  new  line  following  entry  of  data  on  the 

keyboard  of  the  terminal.  After  such  entry,  the  operating 
j  system  sends  a  new  line  to  the  terminal  so  that  transmission  of 

a  normal  text  string  preceded  by  a  'blank'  would  result  in  a 
j  blank  line  appearing  on  the  terminal  between  the  echo  of  the 

key  board  entry  and  the  text  string.  The  insertion  of  a  plus 
,  sign  in  FCHR  immediately  after  a  keyboard  entry  will  supress 

1  this  blank  line,  (See  SUBROUTINE  ECHO). 

j  If  the  BATCH  switch  (in  common  block  BATCH)  is  on, 

transmission  to  the  terminal  is  supressed  and  the  text  string 

j  is  transmitted  to  the  secondary  output  file  only. 

I 

; 


t 
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SUBROUTINE  REALIN (TXT, NUM, VAR, NVAR) 

Function 

REALIN  controls  the  input  of  real  constants  from  the 
keyboard  of  the  terminal  from  which  NERF  is  being  operated. 

Parameter  List 

TXT:  Array  conaining  a  text  string  which  will  be  used  to 
prompt  the  operator  to  enter  the  data  on  the  keyboard. 

NUM:  The  number  of  characters  in  the  text  string  stored  in 
TXT. 

VAR:  Real  array  into  which  the  constants  will  be  stored  and 
transmitted  back  to  the  code  calling  REALIN. 

NVAR:  >0;  The  number  of  constants  to  be  input.  The  number 
is  fixed  and  not  subject  to  variation  by  the  operator 
and  all  the  constants  will  be  entered  on  the  one  line. 
It  is  envisaged  that  this  mode  of  operation  of  REALIN 
will  be  used  for  short  (less  that  5  say)  lists  of 
constants  . 


<0;  The  number  of  constants  to  be  input  is  not  set  by 
the  calling  code  and  REALIN  will  execute  a  series  of 
prompts  to  instruct  the  operator  accordingly.  The 
maximum  number  of  constants  in  this  case  is  -NVAR 
(usually  determined  by  the  space  available  in  VAR). 

*0;  Same  as  above  with  the  maximum  number  of  constants 
set  by  default  to  100. 


Operation 


REALIN  is  a  subroutine  that  is  dependent  on  the 
characteristics  of  the  communications  and  operating  system  of 
the  computer  on  which  NERF  is  installed.  The  current  version 
Is  compatible  with  the  DEC-10  operating  at  ARL  in  1982. 
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For  example,  the  format  10G  for  data  entry  allows  free 
format  to  be  used.  On  other  systems  the  free  format  facility 
may  have  to  be  invoked  some  other  way. 

REALIN  operates  In  two  modes,  depending  on  the  sign  of  NVAR. 

The  first  mode  is  appropriate  if  a  fixed  list  of  constants  is  to 
be  input.  The  second  is  used  to  input  a  list  of  constant,  the 
number  of  which  is,  itself,  part  of  the  information  requested 
by  the  calling  code. 

( i )  Fixed  list  mode 

The  fixed  mode  is  straightforward  in  operation.  The 
line  of  text  entered  on  the  keyboard  is  decoded  and  the 
results  transmitted  to  VAR.  Note  that  no  check  is  made 
on  the  number  of  constants  actually  entered  on  the 
keyboard.  It  is  assumed  that  the  prompt  is  sufficiently 
informative  and  that  the  list  is  short  enough  to  fit  on 
a  single  line. 

(ii)  Variable  list  mode 

Realin  commences  the  variable  list  mode  by 
transmitting  the  prompt  stored  in  TXT  and  then  inviting 
the  operator  to  'enter  values  5  at  a  time  -  terminate 
with  O'.  If  this  method  is  appropriate,  the  operator 
enters  the  value  of  the  constants,  5  to  a  line.  A  zero 
value  for  a  constant  is  Interpreted  as  indicating  the 
end  of  the  list.  NVAR  is  set  to  the  number  of  constants 
input  and  the  results  are  returned  in  VAR. 

Note  that  if  the  number  zero  a  legitimate  value 

for  one  of  the  constants  the  operator  must  enter  a  small 

number  (say  IE-30)  to  represent  that  value. 

* 

Alternatively,  the  operator  may  enter  a  null  line 
(corresponding  to  a  zero  for  the  first  constant.  In 
response , REALIN  requests  that  the  'limits  and  number  of 
Intervals'  of  a  sequence  of  numbers  with  fixed  spacing 
be  specified. 


t+ZZ 


'x 


/f^L 


In  either  method  for  entering  a  variable  list,  the 
operator  can  instruct  REALIN  to  return  an  empty  list  by 
entering  'none'  on  the  keyboard. 

(iii)  General  features 

After  each  line  of  keyboard  entry,  ECHO  is  called  to 
record  the  entry  on  the  secondary  output  file. 

Each  line  is  checked  to  ensure  that  the  first 
character  is  a  legal  charcter  for  a  numerical  constant. 
This  traps  the  likely  error  that  the  operator  has 
entered  a  text  string  by  mistake.  Although  not  a 
conclusive  test  for  data  entry  errors,  this  test  has 
been  found  to  be  successful  in  trapping  most  keyboard 
entry  errors  to  date.  If  an  error  is  detected,  the 
operator  is  invited  to  'enter  again'. 


Prompts 

(i)  Prompt  stored  in  TXT. 

(ii)  'ENTER  VALUES  5  AT  a  TIME  -  TERMINATE  WITH  O';  Initial 
prompt  for  variable  list  mode. 

(iii)  '5  VALUES  ACCEPTED';  Indication  that  a  line  of  data  has 
been  accepted  from  the  keyboard  and  more  is  expected. 

(iv)  'LIST  TERMINATED';  In  variable  list  mode,  the  current 
input  action  has  been  terminated.  Normally  this  occurs 
following  the  entry  of  a  'zero'  constant  on  the 
keyboard . 

Error  Messages 

(1)  'ENTER  AGAIN';  Thai  first  character  entered  was  not 
legal  for  the  representation  of  numeric  data.  The 
operator  must  enter  the  line  of  data  again. 

(li)  'LIMIT  EXCEEDED';  In  variable  list  mode,  the  operator 
has  entered  more  constants  than  the. space  in  the  calling 
code  can  store.  REALIN  terminates  the  input  operation 

and  returns  the  data  received  to  the  point  of  overflow  to 
the  calling  code. 
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SUBROUTINE  TXT IN (TXT , NUM, VAR , NVAR ) 

Function 

TXTIN  controls  the  input  of  a  text  string  from  the  keyboard 
from  which  NERF  is  being  operated  . 

Parameter  List 

TXT:  Array  containing  a  text  string  that  is  to  be 
transmitted  to  the  terminal  to  prompt  the  operator  to 
enter  the  required  text* 

NCH:  Number  of  characters  in  the  string  stored  in  TXT. 

VAR:  Array  into  which  the  text  is  to  be  input  and  then 
returned  to  the  calling  code. 

NVAR:  Number  of  words  in  VAR  available  for  the  storage  of  the 
text . 

Operation 

TXTIN  executes,  in  a  straightforward  manner  the 
transmission  of  the  prompt  in  TXT  to  the  terminal,  the  decoding 
of  the  operator's  response  Into  VAR  and  the  transmission  of  the 
response  to  the  secondary  output  file  via  ECHO. 

Prompt 


(1)  Prompt  stored  in  TXT 
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5.9.2.  Two-dimensional  data  array  output 


There  are  several  requirements  la  HEBF  for  the  output 
of  two-dimensional  arrays  of  numerical  data.  The  subroutines 
ABKOUT  and  IHBOOT  extend  the  basic  communications  routines  to 
provide  a  suitable  facility. 


The  two-dimensional  array  and  Its  dimensions  are  passed 
to  the  appropriate  subroutine  (ABHOOT  for  real  data  and  IRBOOT 
for  Integer  data)  which  then  controls  the  formatting  and 
eventual  output  to  the  secondary  output  file. 


.'.a  In  the  case  of  the  basic  communi cations  routines(  the 
provision  of  these  two  subroutines  frees  the  remainder  of  the 
code  of  the  direct  output  statements  required  to  write  a 
two-dimensional  array  to  the  output  files.  Moreover,  because 
the  output  Is  controlled  by  a  single  section  of  code,  changes 
to  the  format  and/or  output  destinations  are  easily  made. 
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SUBROUTINE  IRROUT (X , M , N ) 
Function 


IRROUT  controls  the  printing  of  the  data  stored  in  the  two 
dimensional  integer  array  X  into  the  secondary  output  file. 

Parameter  List 

X:  Integer  array  containing  the  data  to  be  printed. 

M:  First  dimension  of  X. 

N:  Second  dimension  of  X. 

Operation 

The  data  in  X  is  printed  in  groups  of  10  columns,  (a  column 
corresponding  to  the  first  index  being  constant)  .  Each  row  and 
column  is  labelled  with  the  appropriate  index. 

The  secondary  output  file  is  assumed  to  be  logical  unit 


number  4 
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SUBROUTINE  ARROUT (X , M , N ) 

Function 

ARROUT  controls  the  printing  of  the  data  stored  in  the 
two-dimensional  real  array  X  into  the  secondary  output  file. 

Parameter  List 

X:  Real  array  containing  the  data  to  be  printed. 

M:  First  dimension  of  X. 

N:  Second  dimension  of  X. 

Operation 

The  data  in  X  is  printed  in  groups  of  10  columns 
(corresponding  to  constant  first  index).  Each  column  and  row 
is  labelled  with  the  appropriate  index. 

The  secondary  output  file  is  assumed  to  be  logical  unit 
number  4. 


5.9.3.  Function  file  input 


Some  of  the  functiona  used  to  generate  the  reliability 
functions  are  defined  by  sequences  of  ordered  pairs  of  argument 
and  function  values.  The  sequences  of  ordered  pairs  are  stored 
in  dish  files  called  'function  file’s*  and  are  read  by  the 
subroutine  READFN  described  in  this  Section. 

The  output  produced  by  NERF  is  written  as  a  function 
file  containing  several  functional  each  defined  for  the  same  set 
of  argument  values.  These  files  are  compatible  with  the  format  used 
by  READFN  and  can  be  read  by  the  subroutine  REAEMF  used  by 
NERPLT. 


The  data  preparation  program  KEKPHE  contains  a  subroutine 
called  FCKFIL  which  enables  the  user  to  create  function  files 
interactively  from  the  terminal.  The  files  produced  by  FCNFJL 
are  directly  compatible  with  the  requirements  of  READFN. 


SUBROUTINE  READFNU.F.KUM, FNAME) 


The  subroutine  READFN  opens,  reads  and  closes  a  file  - 
containing  a  sequence  of  ordered  pairs  defining  a  function.  Such 
files  are  referred  to  in  the  NERF  documentation  as  'function 
files ' . 


FNAME:  File  name  -  in  the  fora  of  a  5  character  string  deteriaining 
the  root  for  the  nam*'  of  the  file  containing  the  sequence 
of  ordered  pairs.  All  function  files  have  the  extension 
'.FCN'  . 


Operation 


The  file  naae  is  foraed  froa  the  5  characters  in  FNAME 


and  the  standard  extension,  .FCN,  For  example,  if  the  naae, 


M-n 


' DATA1 1  is  passed  ia  via  FNAME,  READFN  will  look  for  a  file 
called  'DATA1.FCN'. 

The  file  is  opened  aad  read  according  to  the  format 
specification  in  Table  5,21.  The  end  of  the  data  is  defined 
by  the  physical  end  of  the  file. 

Note  that  the  parameter  ICOL,  defining  the  number  of 
columns  is  read  from  the  file.  READFN  reads  only  a  single 
function.  A  companion  subroutine  in  NERPLT  (called  READMF) 
cam  input  several  functions  from  the  one  file.  All  the  functions 
are  assumed  to  be  defined  for  the  same  set  of  argument  values 
and  are  hance  stored  in  'columns'  in  the  file.  READFN  is 
compatible  withREAlMFin  that  it  reads  the  first  column  of 
of  a  multi- function  file. 

After  reading  the  function,  READFN  echoes  the  data  on 
the  primary  output  file.  Note  that  this  is  one  of  the  few 
subroutines  in  NERF  which  writes  directly  to  one  of  the  output 
files. 


The  format  specification  in  Table  5. 21  is  met  by  READFN, 
README  (in  NERPLT) ,  the  output  statements  in  PROGRAM  NERF  and  . 
OUTPUT  and  the  subroutine  FCNFIL  in  NEKPRE  which  prepares 
function  files. 


Be cord 


Format 


Variable 


Significance 


1 

12A5 

■ 

3  lines  of 

•  2 

12A5 

TITLE 

60  characters 

3 

12A5 

4 

identifying  data 

4 

13 

I  COL 

Number  of  columns 

or  functions 

5 

22(2X,2A5> 

heal 

Headings  identifying 

up  to  10  functions 

6 

1 1Q 

mm 

1st  argument  value 

■SM 

1st  function 1  value 

F2( 1 ) , 

1st  functlon2  value 

etc. 

etc. 

7 

1 1G 

X(2>, 

2nd  argument  value 

F(2) , 

2nd  function 1  value 

F2(2) i 

2nd  function2  value 

•  tCm 

* 

etc. 

Table  5*2 1.  Format  (pacification  for  the  function  files, 
The  table  indicates  the  format  for  the  most 
general  'multi  function*  file.  READFN  reads 
the  first  two  numbers  (X,F)  in  each  record. 


5.9.4.  Ran  time  Monitoring  and  program  termination 

The  subroutine  EXTIKE  provides  a  run-time  monitoring  facility 
which  can  be  used  to  limit  the  'cost*  of  a  given  run  by  SERF. 

Because  the  integration  algorithms  are  adaptive,  the  run-time 
for  a  given  calculation  can  not  be  predicted.  In  particular, 
considering  the  possibility  that  the  integration  algorithms 
have  a  finite  (bat  small)  potential  for  failure  which  manifests 
as  a  marked  increase  in  the  number  of  function  evaluations  to 
effect  a  given  integration,  some  control  of  the  run  time  la 
required. 

EXTIME  determines  the  current  run  time:  if  this  run-time 
is  greater  than  a  pre-de terminal  limit  the  program  operation  is 
terminated  by  transferring  control  to  the  subroutine  FINISH. 

The  estimation  of  a  program's  execution  or  run  time  is  not 
standard  within  the  FORTRAN  language.  The  implementation  for 
the  EEC  SYSTEM- 10  is  described  below  -  the  routine  localises 
the  calls  to  the  system  supplied  timing  routines  for  easy 
modification  should  NERF  be  installed  on  another  computer. 

EXTIME  calls  CFNSW  to  ensure  that  the  next  run 
can  start  from  where  the  terminated  run  left  off. 


Program  termination  is  executed  by  the  subroutine  FINISH 
which  computes  the  total  run  time  before  finally  terminating  the 
run.  The  main  objective  in  providing  this  routine  was,  again,  to 
localise  the  system  dependent  timing  and  job  termination  code. 


if-IX . 

SUBROUTINE  EXTIME 
Function 

EXTIME  determines  the  current  run  time  of  the  computer 
program  and  terminates  operations  if  a  preset  limit  is 
exceeded . 

Operation 


The  allowable  run  time,  in  minutes  is  stored  in  RTIME  in  the 
common  block  RTIME.  Access  to  the  clock  is  installation 
dependent.  On  the  DEC-10  at  ARL  a  system  subroutine  called 
TIMES  returns  the  current  job  time,  (not  run  time),  in 
milliseconds.  Thus  when  NERF  starts,  TIMES  is  called  (by  the 
main  program,  NERF)  to  obtain  a  reference  time  which  is  stored 
in  IT  1 ,  again  in  the  common  block  RTIME.  This  value  is  used  to 
convert  the  current  Job  time  to  an  elapsed  time. 

If  the  preset  time  is  exceeded,  control  is  passed  initially 
to  CFNEW  to  update  the  data  control  file  and  then  to  FINISH  to 
terminate  the  operation  of  the  program. 

Prompt 

(1)  'TIME  LIMIT  EXCEEDED';  This  prompt  identifies  the 
reason  for  the  termination  of  the  operation  of  the 
program. 
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SUBROUTINE  FINISH 
Function 

FINISH  terminates  the  operation  of  NERF. 
Operation 


The  run  execution  time  is  computed,  (see  EXTIME  for  details) 
and  an  informative  message  is  transmitted  to  the  terminal  and 
placed  on  the  relevant  output  files  • 

Prompt 

(i)  'RUN  *****  TERMINATED';  (The  run  identification  is 
inserted  in  the  prompt.) 


5*9.5.  Mathematical  functions 


Generally  KERF  relies  on  the  mathematical  functions  provided 
as  part  of  any  FORTRAN  operating  system.  The  exceptions  are 
detailed  below. 

(i)  Exponential  function 

The  function  EXP  1  provides  a  replacement  for  the  usual 
function  installed  in  the  operating  system,  and  traps 
large  values  of  the  argument  -  generating  an  appropriate 
warning  message  when  it  does. 

(11)  Logarithm  function 

The  function  AL0G1  Intercepts  a  zero  value  for  the 
argument  and  returns  a  value  of  -dO.O  to  the  calling 
code.  This  allows  the  calling  code  to  cope  with  a 
possible  error  condition. 

(ill)  Gamma  function 

The  evaluation  of  the  gamma  density  function  (5.53X 
uses  the  function  S14AAF  provided  by  the  NAG  library 
of  scientific  subroutines.  This  is  the  only  mathematical 
function  not  provided  by  a  standard  FORTRAN  system. 


FUNCTION  ALOGl(ARG) 


Function 

ALOG1  is  a  substitute  for  the  natural  logarithmic  function 
provided  by  the  system  software.  This  replacement  returns  the 
value  -80.0  if  the  argument  is  zero. 

Parameter  List 

ARG:  Argument  for  the  natural  logarithm  function. 
Operation 

ALOG1  uses  the  system  function  ALOG  to  evaluate  natural 

-30 

logarithm  for  values  of  ARG  greater  than  or  equal  to  10 
Otherwise  the  value  -80.0  is  returned. 
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FUNCTION  EXP  1 (ARG) 

Function 

EXP  1  1  s  a  replacement  for  the  exponential  function  provided 

# 

by  the  system  software.  The  replacement  function  provides  an 
error  message  of  the  argument  exceeds  80.0. 

Parameter  List 

(ARG)':  Argument  for  the  exponential  function. 

Operation 

If  ARG  exceeds  80.0,  an  error  message  is  transmitted  to  the 
terminal  and  the  secondary  output  file.  No  further  action  Is 
taken  so  that  EXP  I  returns  the  evaluation  made  during  the 
previous  call. 

If  ARG^O,  the  value  0.0  is  returned. 

Error  Messages 

(1)  'EXP  1  ...  ARG  OUT  OF  BOUNDS';  The  argument  of  EXP1 


exceeds  80.0 


5. 10.  Graphics  Support 
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As  described  in  Section  5.2.6.,  the  program  NERF  provides 
for  the  construction  of  three  types  of  graphical  representations 
of  the  processes  involved  in  the  evaluation  of  the  reliability 
functions,  viz,  outer  integrand  plots,  integrand  -  function 
evaluation  maps  and  loss  factor  maps.  The  post  processor  XERPLT 
provides  facilities  for  plotting  the  functions  produced  by  NERF. 

The  documentation  in  this  Section  concentrates  on  the 
facilities  provided  by  NERF  itself.  However,  the  program  NERPLT 
is  briefly  described  in  Section  5.10.5.  For  completeness. 

NERPLT  makes  use  of  several  of  the  subroutines  contained 
in  the  NERF  program  and  presented  in  this  document. 

The  library  of  graphics  subroutines  forms  a  separate 
entity  within  the  NERF  program.  Graphics  facilities  can  be 
removed  by  loading  a  dummy  set  of  subroutines  in  place  of 
this  library.  Because  the  associated  prompts  are  contained 
within  the  graphics  library,  the  program  will  then  behave 
as  if  there  were  no  graphics  facilities. 

The  description  of  the  graphics  subroutines  follows  the 
top-down  sequence  of  presenting  the  groups  of  subroutines 
associated  with  particular  representations  followed  by  the 
group  of  subroutines  that  provide  more  basic  facilities. 


Before  embarking  on  this  description,  the  following 
general  comments  are  in  order. 

(1)  All  the  graphical  output  produced  by  a  single  run  of 
the  KERF  program  is  transmitted  to  a  file  called 
FNAME.PLT  on  logical  unit  number  5.  FNAME  is 
the  5  character  run  identification. 

(ii)  Graphics  operations  are  controlled  by  the  logical 

switch  PLTIHT.  At  the  commencement  of  an  Interactive 

* 

run  the  operator  is  asked  if  integrand  plots  are 
required.  An  affirmative  reply  switches  PLTINT  on  and 
the  graphical  facilities  are  activated.  Otherwise 
graphical  facilities  are  not  active  for  the  whole  run. 

(ill)  The  graphics  subroutines  rely  on  the  plotting 

library  installed  on  the  DEC  -  SYSTEM  10  at  ARL.  Although 
there  is  a  general  tendency  for  those  subroutines  to 
be  called  more  frequently  from  the  more  basic  graphics 
routines,  the  code  has  not  been  structured  to  the 
extent  that  only  the  basic  routines  rely  on  the 
particular  plotting  subroutines  provided  by  the 
computer  installation  on  which  NERF  is  operating. 


*The  option  to  create  plots  is  offered  only  if  there  is 
a  single  evaluation  time  for  the  run. 


5.10.1.  Outer  Integrand  plots 


The  construction  of  an  outer  integrand  plot  consists 
of  two  phases.  Airing  the  first  phase,  the  integrand  evaluations 
are  stored  as  the  integrand  is  evaluated.  The  second  phase 
commences  after  the  integral  has  bgen  evaluated  and  contains 
those  operations  necessary  to  construct  the  plot. 

Three  high  level  subroutines  are  involved.  Subroutine 
PLTSET  initialises  the  storage  areas  used  to  store  the  Integrand 
evaluations.  PLTSTR  stores  the  pairs  of  integration  variable 
and  integrand  values  as  the  integration  proceeds  and  PLTOUT 
plots  the  stored  values  as  a  graph  having  the  general  form  of 
the  example  given  in  Figure  5.7. 

It  is  up  to  the  calling  code  to  ensure  that  the 
integrand  values  are  stored.  This  is  why  the  various  Integrand 
functions  in  SERF  have  code  which  detects  whether  the  particular 
integrand  function  is  the  outermost  Integrand  and,  If  so,  calls 
PLTSTR  to  store  the  evaluation. 

The  three  subroutines  described  in  this  section  perform 
the  general  operations  described  above.  The  details  of  the  actual 
plots  created  are  dictated  to  a  large  extent  by  the  subroutines 
described  in  Section  5. 10. i+. 
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SUBROUTINE  PLTOUT (TITLE , NCH , LABX, NX, LAB Y , NY ) 

Function 

Subroutine  PLTOUT  constructs  s  two-dimensional  plot  of  data 
pairs  that  have  been  stored  during  a  series  of  previous  calls 
to  PLTSTR • 

Parameter  List 

TITLE:- Text  string  containing  a  heading  for  the  plot. 

NCH:  The  number  of  characters  in  the  heading. 

LABX:  Text  string  containing  a  label  for  the  X  axis, 

(representing  the  argument) . 

NX:  The  number  of  characters  in  LABX.  (Only  the  first  5 
characters  are  used.) 

LABY:  Text  string  containing  a  label*  for  the  Y  axis, 

(representing  the  function)  . 

NY:  The  number  of  characters  in  LABY.  (Only  the  first  5 
characters  are  considered.) 

Operation 

PLTOUT  uses  SET6RF  to  initialise  a  suitable  plot  space  and 
then  sweeps  through  the  data  pairs  stored  in  FARG  and  FVAL , 
constucting  a  user  selected  symbol  to  represent  each  point.  To 
do  this,  PLTOUT  determines  the  ranges  of  the  argument  and 

function  values  which  are  then  used  as  a  basis  for  an 

Interactive  dialogue  to  determine  the  limits  for  the  graph  and 
any  other  Information  required  by  SETGRF.  Once  the  plot  space 
has  been  initialised  each  data  pair  is  scaled  and  vignetted,  If 
necessary,  before  the  subroutine  POINT  is  called  to  construct 
the  symbol. 


SO  I 


Tot 


Error  Messages 

(i)  'NOTHING  TO  PLOT':  PLTOUT  has  been  called  with  empty 
data  arrays .  No  plot  is  created. 

(ii)  'INSUFFICIENT  DATA  TO  PLOT':  PLTOUT  has  been  called 
with  only  one  data  pair  in  storage.  No  plot  is  created. 

Prompts 

(  i>  'OUTER  INTEGRAND  PLOT' 

'ARGUMENT  VALUES  ARE  BETWEEN  ****  AND  **** 

'xmin,xmax,xstep' 

Suitable  limits  for  the  argument  together  with  an 
appropriate  interval  for  the  labelling  of  the  X  axis  are 
requested  • 

(ii)  'INTEGRAND  VALUES  ARE  BETWEEN  ****  AND  **** 

'YMIN , YMAX, YSTEP ' 

The  limits  for  the  integrand  data  to  be  plotted  and  a 
suitable  interval  for  the  labelling  of  the  Y  axis  are 
requested  . 

(ill)  'POINT  CODE':  A  number  identifying  the  the  type  of 
symbol  to  be  used  to  represent  each  data  pair  is 
requested.  (For  code  values  refer  to  Table  &. XX.) 

Storage  Conflict 

The  arrays  FARG  and  FVAL  used  to  store  the  data  pairs  occupy 
apace  in  the  GEXP  array  in  COMMON  block  GCOM. 
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POINT  CODE 

SYMBOL 

1 

Triangle 

2 

X 

3 

♦ 

4 

Square 

5 

Point 

6 

Octagon 

ASCII  String 

First  character 

of  string. 

TABLE  5«22.  Values  for  'point  cods'  and  the  resulting  symbols. 
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SUBROUTINE  PLTSET 


Function 

PLTSET  clears  the  storage  areas  used  for  data  pairs  that 
will  be  ultimately  used  for  the  construction  of  'outer 
integrand  plots'  . 

Operation 

The  clearing  operation  is  effected  by  simply  setting  IMAX  to 
zero  . 

PLTSET  also  sets  the  switch  PLOTON  which  flags  whether  an 
outer  Integrand  plot  Is  required  or  not.  The  flag  remains 
operative  until  the.  next  call  to  PLTSET 

Prompt 

(i)  'OUTER  INTEGRAND  PLOT?':  Prompt  requests  a  response 
from  the  operator  to  set  the  switch  PLTON.  It  is 
assumed  that  a  prompt  indicating  the  Integration 
currently  being  made  has  been  issued. 
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subroutine  PLTSTR (ARG, VAL) 

Function 


Subroutine  PLTSTR  stores  a  data  pair  consisting  of  an 
argument  and  the  value  of  an  associated  function  for  later 
plotting  as  a  series  of  points  on  a  two-dimensional  graph* 
This  construction  is  used  by  NERF  to  construct  'outer  integrand 
plots'  . 

Parameter  List 

ARG:  Value  of  the  argument  for  the  data  pair* 

VAL:  Value  of  the  function  for  the  data  pair* 

Operation 

The  role  of  PLTSTR  is  to  store  the  argument  and  function 
values  in  the  arrays  FARG  and  FVAL  respectively.  As  each  data 
pair  is  stored  an  index,  IKAX,  is  Incremented  so  that  it  always 
Indicates  the  total  number  of  data  pairs  in  storage. 

Note  that  if  the  switch  PLOTON  is  false,  no  action  is  taken 
by  PLTSTR. 


I 
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5.10.2.  Integrand  -  function  evaluation  nap a 

Contour  maps  for  the  functions  p^t,^)  and  PF(t,n0) 
are  constructed  for  the  full  nodal  with  nQ  constant  if  the 
run  is  interactive  and  the  operator  has  responded  in  the  affirmtive  to  the 
appropriate  pronpts.  The  naps  are  constructed  by  the  subroutine 
IMTPLT  which  is  called  froa  the  function  FRLTO. 

FHLTO  is  used  as  the  integrand  function  for  both  P_(t) 
and  rs(t).P^(t):  the  switch, HIS£  is  used  to  distinguish  between 
the  two  functions.  This  logical  variable  is  used  by  FHLTO  to 
select  an  appropriate  heading  for  the  nap:  functions  are 
Identified  here  and  by  the  progran  NEHPLT  as  listed  in  Table  5.23. 

The  switch  also  selects  the  appropriate  terns  evaluated  by  the 
integrand  function  FALP. 

For  reference,  a  typical  integrand  nap  is  shown  in  Figure  5.32. 

The  nap  is  constructed  by  evaluating  the  integrand  at  points  in 

space  which  correspond  to  the  intersections  of  set  of  lines 
constructed  in  the  sane  way  as  the  interpolation  neah  used  for 
the  loss  factor.  However  in  this  case  a  different  set  of  values 
is  used.  The  selection  of  these  fl  values  is  described  below  in  the 
doeunentatlon  for  IHTPLT. 

Looking  at  the  nap,  the  sequence  of  operations  for  its 
construction  are  as  described  below. 

(i)  The  plot  space  is  initialised  by  the  subroutine  SETQRF  which 
draws  the  box  around  the  plot  area,  annotates  the  axes  and. 


Heading 

Symbol 

Significance 

LOAD 

L 

Load 

BETA 

P 

Age 

ALPHA 

«c 

Virgin  strength 

AGE 

t 

Age 

LENGTH 

a 

Crack  length 

AO 

aO 

Initial  crack  length 

EXEC  RATE 

S.dOJ-r 

r2(R) 

PSI 

A) 

Median  strength  decay  function 

STRENGTH 

R 

Strength 

ALPHA  DIST 

P^U) 

Density  for 

BETA  DIST 

Vfip) 

Density  for 

P(AO) 

%<*0> 

Density  for  aQ 

F(aO) 

F.0(,O> 

Outer  integrand  for  aQ. 

F(BETA) 

*>(#> 

Outer  Integrand  for 

F( ALPHA) 

F*X«c) 

Outer  integrand  for 

RISK 

r(t) 

Total  risk 

RISKS 

rs(t) 

Ridi  of  static  fracture 

RISKF 

rf(t) 

Risk  of  fatigue  life  exhaustion 

RISKV 

rv(t) 

Virgin  risk 

MEAN  RISK 

rmean(t) 

Mean  risk 

PR.  FAIL 

P-(t) 

»;<*> 

Probability  of  failure 

PR.  S17RVIV 

Probability  of  survival 

AV.  LIFE 

ECF) 

Expected  time  of  failure 

PR.  REJECT 

RSLT 

*det<*> 

r.(t).Ps(t) 

Probability  of  detection 

PF 

P£(t)  ~ 

PgCHIt) 

PgCHi t) 

p^(Rlf>t) 

Probability  of  failure 

FLD 

Density  for  failing  load 

FLP 

Distribution  of  failing  load 

RSD 

Density  for  strength 

RSP 

P^(R\  F>t) 

Distribution  for  strength. 

Table  5.23.  Headings  used  on  plots  and  their  meanings, 
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writes  the  title  above  the  plot  space. 

Cii)  the  (*£,^)  domain  is  initialised  by  the  subroutine 
SETPLT  which  also  draws  the  domain  boundaries. 

(ill)  The  actual  map  is  constructed  by  the  subroutine  ARKPLT 

which  calls  a  contouring  subroutine,  GO NT.  This  subroutine 
constructs  the  contour  lines  with  reference  to  the 
indices  of  the  array  used  to  store  the  values  of  the 
integrand^  The  mapping  between  those  indices  and  the 
(o£,@)  space  is  controlled  by  the  subroutine  P  which 
eventually  plots  the  points  generated  by  COJIT.  Subroutine 
P  also  labels  each  contour  line  by  writing  an  identification 
number  at  the  start  of  each  contour  line. 

Civ)  Extra  lines  Indicating  inspection  boundaries  can  be  drawn 
on  the  map  as  shown,  for  example,  in  Figure  5.9.  This 
action  is  controlled  by  INTPLT. 

(v)  The  subroutine  INTPLT  writes  the  contour  levels  beneath 
the  map.  (This  text  was  removed  from  the  plot  used  to 
produce  Figure  5.32  and  the  contour  levels  were  written 
beside  the  lines  by  hand.) 

The  various  subroutines  are  not  called  in  the  sequence 
indicated  above,  but  instead,  fora  a  hierarchy  as  indicated  in 
Figure  5.33*  Only  the  subroutine  INTPLT  is  exclusive  to  the 
integrand  map  construction  process  and  is  described  in  this  Section. 
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After  the  map  has  been  constructed,  FRLTO  continues 
with  the  evaluation  of  the  double  integral  expression  defining 
the  function  protrayed  by  the  map.  During  this  evaluation 
the  subroutine  PLTPNT  is  called  to  plot  each  point  at  which 
the  integrand  is  evaluated.  A  typical  result  of  this  action 
is  shown'  in  Figure  5.34. 

As  described  in  the  documentation  for  PLTPNT  below, 
the  insertion  of  the  evaluation  points  on  the  Integrand 
map  can  be  restricted  to  subdivisions  above  nominated  levels 
(different  levels  foro<  and^)  so  that  the  final  plot  does  not 
become  too  cluttered. 


UM319  RSLT  INTEGRAND 


JB 

JB 

JB 

JB 

JB 

JB 

JB 

0JB  SCBBBjB 

BETA 


Figure  5.  Integrand  plot  vith.  locations 

of  Integrand  evaluations  Indicated. 
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SUBROUTINE  INTPLT (TITLE , NCH , B 1 , B 2 ) 
function 

INTPLT  controls  the  contruction  of  a  contour  map  of  the 
integrand  of  a  two-dimensional  integration  over  and  using 
the  function  PALP.  The  subroutine  also  controls  the 
construction  of  representations  of  the  various  integration 
bounds  that  are  applicable. 

Parameter  List 

TITLE:  Text  string  containing  a  suitable  title  for  the  map. 

NCH:  Number  of  characters  in  the  title. 

Bl:  Lower  ^  limit  for  the  integration. 

B2:  Upper  £  limit  for  the  Integration. 

Operation 

The  map  is  constructed  over  the  same  region  in  d  ,0 space  over 
which  the  loss  factor  interpolation  table  is  described.  The 
mesh  used  to  define  the  point  values  of  the  integrand  used  for 
the  map  resembles  that  used  for  the  loss  factor  but  has  more 
val ues  . 

The  actual  number  of  additional  nodes  depends  on  the 
available  space  In  the  GEXP  array,  (used  to  store  the  point 
values),  and  the  value  of  an  Integer  NTTP  which  sets  the 
typical  resolution  for  the  |3  direction. 

The  (S  nodes  used  to  define  y(jl)  are  used  as  a  basis, 
additional  nodes  being  Inserted  to  ensure  that  the  maximum 
interval  is  less  than  )/(NTYPE-l  ) .  NTYPE  is  initially  set 

to  41  and  once  the  extra  nodes  have  been  inserted,  the  user  is 
given  the  opportunity  to  change  NTYPE  to  either  increase  or 
decrease  the  final  number  of  nodes.  If  during  the  insertion 
process,  the  available  storage  is  exceeded,  the  user  is  advised 
and,  again,  given  the  opportunity  to  change  NTYPE. 
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Once  che  total  number  of  new  nodes  has  been  established  and 
the  nodes  transferred  to  the  array  BETINT  in  INTCOM,  INTPLT 
performs  the  following  tasks* 

(1)  ISWT  Is  set  to  1  to  Indicate  that  the  data  in  INTCOM 
defines  the  relationship  between  the  node  indices  and 
«S|S.  (Rather  than  the  normal  data  used  for  the  loss 
factor  table*) 

(ii)  -The  «C  limit  arrays,  ALP1IN  and  ALP2IN  are  computed 
according  to  equation  (5.74)  and  (5.75). 

(ill)  The  integrand  values  at  each  mesh  point  are  evaluated. 
Note  that  PLTINT  is  set  to  false  to  prevent  any  of  the 
plotting  facilities  in  PALP  from  being  activated. 

(iv)  After  seeking  a  response  from  the  operator,  ARROUT  is 
called,  if  required,  to  print  the  Integrand  values. 

(v)  ARRPLT  is  called  to  construct  the  contour  map. 

(vi)  The  P  limits  defined  by  B1  abd  B2  are  drawn  on  the  plot 
using  the  subroutine  SMOOTH  to  create  broken  lines. 

(vii)  The  proof  load  inspection  boundary  is  included  by 
calling  RLINE  with  IPM— 1. 

(viii)  After  seeking  responses  from  the  operator,  extra  R 
lines  having  R-  constant  are  constructed  using 

RLINE. 

Prompts 

(i)  'INTEGRAND  PLOT?':  The  operator  is  requested  to  select 
wether  to  plot  the  currnt  map  or  not*  It  is  assumed  that 
prompts  issued  prior  to  calling  INTPLT  will  identify 
this  prompt . 

(ii)  'USING  NTYPE  -  ***  INTEGRAND  MATRIX  IS  ***  BY  *** 
CHANGE  NTYPE?': 

The  operator  is  given  the  oportunity  to  change  NTYP  and 
hence  the  resolution  In  the  &  direction. 
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(iii)  NEW  VALUE  FOR  NTYPE':  This  prompt  follows  a  response  of 
YES'  to  the  one  above.  The  operator  enters  the  new 
value  of  NTYPE. 

(iv)  'USING  NTYPE  -  ***  INTEGRAND  PLOT  FAILURE  AT  J  -  *** 
NEW  VALUE  FOR  NTYPE': 

The  available  storage  has  been  exceeded  when  trying  to 
satisfy  the  resolution  specified  by  NTYPE.  The  value 
of  J  indicates  how  far  through  the  sequence  of  (S  nodes 
that  INTPLT  had  got.  The  operator  must  enter  a  lower 
value  for  NTYPE. 

(v)  'PRINT  INTEGRAND  VALUES':  The  operator  enters  'YES'  is 
a  printout  of  the  integrand  values  is  required. 

(vi)  'INCLUDE  RLINES ' :  The  operator  enters  'YES'  if 
additional  R  lines  are  required  on  the  plot. 

(vii)  'R  VALUES':  The  operator  is  asked  to  specify  the  R 
values  for  the  additional  R  lines.  Responses  follow 
those  specified  for  REALIN. 

(viii)  DOT  CODE':  The  operator  must  enter  an  integer  defining 
the  line  coding  used  for  the  additional  R  lines.  (See 
SMOOTH  for  details.) 


SUBROUTINE  PLTPNT 
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Function 

PLTPNT  plots  the  position  of  the  point  ) ,  (defined  by 

ALPV  and  BETV  in  the  COMMON  block  PARCOM)  ,  on  a  two-dimensional 
integrand  diagram.  The  point  is  assumed  to  be  associated  with 
a  double  integration  over  «*■  and  :  a  level  of  subdivision  as 
indicated  by  the  numbers  Jl  and  J2  in  INF0R1  and  INF0R2 
respectively  can  be  associated  with  the  point. 

Operation 

PLTPNT  assumes  that  the  plot  space  has  been  initialised  by  a 
prior  call  to  SETPLT.  The  point  is  plotted  by  the  subroutine 
POINT  which  is  supplied  by  the  DEC  SYSTEM-10  software. 

The  first  time  PLTPNT  is  called,  the  operator  is  asked  to 
specify  the  maximum  level  of  subdivision  for  which  the  points 
will  be  plotted.  The  operator  is  also  asked  to  specify  the  type 
of  symbol  which  will  be  used  to  Indicate  the  position  of  the 
point.  The  code  for  the  symbol  is  stored  in  ICODE  and  is  passed 
into  POINT.  The  symbols  and  their  associated  code  numbers  are 
listed  in  Table  5.2.2.  . 

Prompts 

(i)  'INDICATE  MAX.  LEVELS  FOR  PLOTTING' 

'FUNCTION  EVALUATION  POINTS' 

'BETA' 

The  operator  is  asked  to  specify  the  maximum  level  of 
subdivision  in  the  integration  for  the  display  of 
evaluation  points. 

(ii)  'ALPHA':  The  operator  is  asked  to  specify  the  maximum 
level  of  subdivision  for  the  pC.  integration  for  the 
display  of  evaluation  points. 

Note  that  a  value  of  0  for  both  limits  results  in  no 
action  by  PLTPNT.  Refer  to  Section  4.1.  for  the 


significance  of  tha  levels  of  subdivision. 

(iii)  'ENTER  POINT  CODE  -  1,2, 3,4, 5  OR  6':  The  operator  is 
asked  to  specify  the  code  for  the  selected  symbol. 


5.10.3.  Loss  factor  mans 


Contour  maps  of  the  following  functions  can  be 
constructed. 


Cl)  0  Integral 


Tbs  0  Integral  is  the  function  stored  in  the  file 
GCOM. DAT  and  Is  defined  by 


f? 

Jt. 


(5.263) 


(ii)  Q  Function 


The  G  function  is  defined  by, 


G  C-.,?)f 


(5.264) 

(5.265) 


(ill)  Loss  factor 

The  loss  factor  H(«t,£,n0,t)  is  defined  by  equation  (5.60) 
and  either  (5.61)  or  (5.62)  depending  on  the  value  of  nQ. 

Contour  maps  of  the  first  two  functions  are  offered  by 
the  subroutine  SSTTAB.  The  facility  to  construct  these  naps 
was  Installed  during  program  development  and  it  is  not  envisaged 
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that  it  will  toe  used  particularly  often. 

The  loss  factor  has  the  most  obvious  physical  interpretation 
and  is  constructed  by  the  subroutine  RSKTOT.  A  typical  example 
is  given  in  figure  5.35. 

The  three  functions  are  mapped  by  establishing  a  matrix 
of  values  at  points  corresponding  to  the  intersections  of  the 
lines  in  the  loss  factor  Interpolation  mesh.  These  values 
are  calculated  in  the  subroutine  constructing  the  map  (i.e. 

SETTAB  or  RSKTOT)  and  ARRPLT  is  called  directly  to  construct 
the  map.  A  simple  switch  in  the  subroutine  P  is  used  to 
distlgulsh  between  these  maps  and  the  integrand  maps  which  use 
a  different  mesh. 

An  optional  facility  provided  during  the  construction 
of  the  map  of  the  Q  function  is  the  construction  of  a  representation 
of  the  loss  factor  Interpolation  mesh.  Subroutine  QRID  makes 
the  construction  and  an  example  was  given  in  Figure  5*12. 
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SUBROUTINE  ARRPLT (TITLE , NCH , ARR ,M, N ) 

Function 

ARRPLT  controls  the  construction  of  a  contour  map  of  the 
data  stored  in  the  array  ARR.  This  data  usually  represents  the 
Integrand  of  a  two-dimensional  integration  over  at  and  p ,  but 
can  represent  the  loss  facton  the  G  function  or  the  G  integral 

Parameter  List 

TITLE:  Text  string  defining  a  suitable  title  for  the  contour 
map  . 

NCH;  Number  of  characters  in  TITLE. 

ARR:  Array  of  data  values  of  the  function  for  which  the  map 
is  to  be  constructed. 

M:  First  dimension  of  ARR,  (corresponding  to  the  ft 
direction . ) 

N:  Second  dimension  of  ARR,  (corresponding  to  the  at. 
direction . ) 

Operation 

Much  of  the  work  associated  with  the  construction  of  the  map 
is  preformed  by  other  routines  which  ARRPLT  calls  to  execute 
the  sequence  of  operations  listed  below. 

(i)  A  prompt  identifying  the  map  being  created  is  generated 
to  relate  subsequent  prompts  correctly. 

(11)  The  plot  space  is  initialised  by  calling  SETPLT. 

(ill)  The  numerical  range  of  the  data  in  ARRPLT  is  computed 
and  used  during  an  interactive  dialoque  which 
establishes  the  contour  levels  to  be  used  in  the  map. 

(iv)  The  contour  levels  are  written  beneath  the  plot  space. 


(v)  If  the  operator  selects  an  optional  logarithmic 
interpolation  facility,  the  logarithms  of  all  the  data 
in  ARR  and  the  contour  levels  are  taken. 

(vi)  The  map  is  contructed  by  calling  the  subroutine  CONT . 

Prompts 


(i)  'FUNCTION  LIMITS  *****  ***** 

LEVELS ' : 

The  user  is  requested  to  define  the  contour  levels.  The 
possible  responses  are  described  in  the  documentation 
for  REALIN. 

(ii)  'USE  LOG  INTERPOLATION?':  The  user  can  select  the 
optional  facility  for  using  logarithmic  interpolation 
for  the  construction  of  the  contour  map. 
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SUBROUTINE  RLINE (RARG , IPM) 

Function 

Subroutine  RLINE  draws  the  line  Rmtef(f$)  on  a  plot  space  that 
hase  been  set  up  for  a  two-dimensional  Integrand  plot.  If  IPM 
is  negative,  the  line  R  -  (ng+  (0-ng)  ti j /t)  )  is  drawn 
instead.  (The  latter  line  corresponds  to  a  oroof  load 
inspection  boundary.) 

Parameter  List 

RARG:  Value  of  R  fo'r  which  the  line  is  required. 

IPM:  Control  parameter  (integer). 

_>  0 ,  Same  as  for  positive  values  of  IDOT  in  SMOOTH. 

<0,  The  alternative  line  described  above  is  drawn. 
IPM  has  the  same  significance  as  IDOT  in  SMOOTH. 


Operation 

RLINE  operates  by  generating  a  sequence  of  data  pairs  of 
and  which  are  passed  to  SMOOTH  to  construct  the  line.  The 
line  is  vignetted  by  the  limits  (•<.  .  and  oC_„)  so  that  the 
code  generatimng  this  sequence  has  three  sections.  The  first 
and  last  sections  determine  the  end  points  of  the  line.  The 
middle  section  generates  the  intermediate  values  of  p  and  the 
corresponding  values  ofoC. 

The  f  points  are  chosen  using  the  nodes  defining  yw(£)  as  a 
basis  and  inserting  extra  nodes  to  ensure  that  all  the 
intervals  are  less  than  RINTVL*(/?n  -  (S^)  where  RINTVL  is  set 
within  RLINE.  (Currently  RINT VL -0 . 02 . ) 

If  IPM  is  negative,  meaning  that  the  proof  load  inspection 
boundary  is  being  drawn,  the  line  is  resticted  to  n^^  (5n . 


SUBROUTINE  GRID 


Function 

Subroutine  GRID  draws  a  representation  of  the  mesh  used  for 
the  interpolation  of  the  loss  factor  on  the  plot  space  set  up 
for  the  display  of  Integrand  functions. 


Operation 


The  -mesh  lines  correspond  to  integer  arguments  for  the 
subroutine  P(X,Y,NPE).  The  representation  is  drawn  in  an 
oblous  way  by  following  lines  having  one  of  the  arguments  of  P 
held  at  a  constant  value  for  each  mesh  line. 


SZ1+ 


SUBROUTINE  CONT (T ,MD , ND , CONLE V, NC ) 

Function 

Subroutine  CONT  constructs  a  contour  map  of  the  surface 
represented  by  the  array  of  spot  heights,  T.  The  map  Is 
constructed  relative  to  the  two-dimensional  orthogonal  mesh 
defined  by  the  indices  of  T  and  transformed  to  a  real  system  via 
the  subroutine  F  which  contains  all  the  plot  system  dependent 
code . 

Parameter  List 

T:  Array  containing  spot  heights  of  the  surface  to  be 
contoured . 

MD:  First  dimension  of  T. 


ND s  Second  dimension  of  T. 

CONLEVs  Array  containing  the  contour  levels  to  be  used  in  the 
map  . 


NC s  The  number  of  levels  stored  in  CONLEV. 


Operation 


Subroutine  CONT  is  a  large  routine  which  was  developed  as 
part  of  more  general  purpose  graphics  software  for  which 
documentation  will  be  eventually  provided.  It  is  beyond  the 
scope  of,  nor  required,  that  this  documentation  describes  the 
details  of  the  contouring  process. 


Broadly  the  array  T  is  searched  to  find  the  significant 
features  of  the  surface  and  possible  starts  and  finishes  of 
contour  lines  noted.  For  each  contour  level,  the  routine  then 
traces  the  contour  lines  using  a  systmatic  procedure  which 
ensures  that  all  lines  are  drawn  but  no  line  drawn  more  than 


once . 
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Error  Messages 


(i)  'ERROR - N  (***)  IS  LARGER  THAN  IRMX  (***)':  The 

number  of  Che  second  dimension  of  T  exceeds  Che  space 
available  in  CONT  for  Che  scorage  of  informacion 
percaining  Co  Che  locacion  of  possible  scares  for 
contour  lines  .  The  dimension  of  Che  array  IROW  will 
have  Co  be  increased  and  CONT  re-compiled. 


Noce-  chac  CONT  contains  anocher  fixed  array,  IS,  which  is 
used  Co  score  Che  loeacions  of  all  possible  scarcing  poinCs  for 
a  given  concour  level.  If  this  scorage  Ls  exceeded,  CONT 
auComaCically  bands  Che  array  an  conscruccs  Che  map  in  smaller 
seccions.  If  Chis  occurs  ofeen  (meaning  Chat  Che  surface  is 
always  very  complex)  the  size  of  the  array  should  be  increased 
as  1C  is  slighcly  more  efficient  to  construct  the  map  for  Che 
whole  array  at  once. 
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SUBROUTINE  DIAG (T , M ,M 1 , N 1 , I, J,C1) 

Function 

Diag  finds  the  point  of  intersection  of  a  contour  line  with 
the  diagonal  of  a  mesh  cell.  The  routine  is  called  only  by 
CONT. 

Parameter  List 

T:  Array  of  spot  heights. 

M:  First  dimension  of  T.  . 

Ml:  Local  X  directional  offset. 

Nl:  Local  Y  directional  offset. 

I:  First  index  for  current  mesh  cell. 

J:  Second  index  for  the  current  mesh  cell. 

Cl:  Contour  level. 

Operation 

Subroutine  DIAG  is  called  by  CONT  during  the  process  of 
tracing  a  contour  liqe .  DIAG  calculates  the  point  of 
intersection  of  the  contour  line  with  the  diagonal  of  the  mesh 
cell  and  plots  the  point  by  calling  subroutine  P. 

If  the  logical  switch  DGS  is  true,  diagonal  interpolation  is 
neglected  and  DIAG  does  nothing. 
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SUBROUTINE  P(X,Y,NPE) 
Function 


Subroutine  P  converts  an  X,Y  position  relative  to  two  array 
indices  to  two  real  coordinates  for  plotting. 

P  is  used  primarily  by  the  contouring  subroutine,  CONT  but 
is  also  used  by  the  subroutine  GRID  which  constructs  a 
representation  of  the  interpolation  mesh  for  the  loss  factor 
table  . 

Parameter  List 

X:  X  coordinate,  relative  to  the  first  array  index  of  the 
point  to  be  plotted. 

y:  Y  coordinate,  relative  to  the  second  array  index  of  the 
point  to  be  plotted. 

NPE:  Control  parameter. 

s 

■2,  Current  point  is  joined  to  last  point. 

■3,  Current  point  is  not  joined  to  last  point.  The 
current  contour  level  is  drawn  adjacent  to  the  point. 

■4,  Current  point  is  the  last  point  in  a  closed  curve. 

■13,  As  for  3  but  no  level  is  drawn. 


Operation 


Subroutine  P  has  two  main  tasks.  The  first  is  the 
calculation  of  and  from  the  values  of  X  and  Y.  The  second  is 
the  control  of  the  plot  instructions  required  to  comply  with 
the  actions  specified  by  NPE. 

P  effects  the  transformation  from  X,Y  to  by  accessing  two 
alternative  data  sources.  The  first  defines  the  geometrical 
arrangement  of  the  loss  factor  table  and  is  stored  in  the 
COMMON  blocks  PSICOM  and  ALPCOM.  The  second  set  defines  the 
refined  geometry  used  to  define  an  integrand  functions  and  is 
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stored  in  the  COMMON  block  INTCOM.  Selection  between  the  two 
data  sources  is  made  by  the  integer  ISWT  in  COMMON  block  ISWT. 
If  ISWT-0  the  first  source  is  used.  If  ISWT-1,  the  second  is 
used  . 

In  both  cases,  the  transformation  is  made  via  the  same 
sequence  of  operations.  The  interval  containing  is  found  so 
that  ^_<p<  *  Tl*en  ^  is  given  by 

(*  3  +  (X  -  (5.266) 

The  corresponding  oC  val ue  can  then  be  retieved  using  ALPTAB 
described  in  Section  5.4.1.  Rather  than  obtain  the  oc  value 
directly,  values  for  RK-Y  are  found  for  f  and  end  linear 
interpolation  used  to  calculate  for  (3  .  (If  direct  evaluation 
is  used,  contour  lines  can  cross  the  boundaries  of  the 
integration  domain  by,  admittedly,  small  amounts.  The  result 
using  the  double  evaluation  and  linear  interpolation  is 
aesthetically  more  pleasing.^ 

The  remainder  of  the  code  perfoms  the  second  task  in  an 


obvious  manner 
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SUBROUTINE  SETPLT(TITLE, NCH) 

Pane tl on 

The  subroutine  SETPLT  initialises  a  two-dimensional  plot 
representing  an  integration  domain  in  («* ,{J )  space.  The  plot 
space  is  intended  for  use  either  as  an  integrand  -  function 
evaluation  plot  or  as  a  loss  factor  map. 

Parameter  List 


TITLE:  Character  string  indentifyiag  the  plot. 

NCH:  Number  of  characters  in  the  string  stored  in  TITLE. 

Operation. 

The  plot  space  is  initialised  via  the  following  steps. 

(i)  A  new  origin  is  established  at  the  bottom  left  hand 
corner  of  the  current  plot  space  and  the  scale  factors 
used  by  the  plotting  software  are  restored  to  1. 

(On  an  initial  call  to  SETPLT,  XVAR( 1 )  and  YVAR( 1 )  are 
assumed  to  be  set  to  zero  so  that  this  step  has  no 
nett  effect.) 

(il)  A  new  plot  area  is  established  by  calling  SETQRF. 

Note  that  SETPLT  checks  the  plot  counter  (INP)  stored 
in  the  common  block  PLTPMS.  If  INP  has  been  incremented 
since  the  last  call  to  SETPLT  (as  would  be  the  case  if 
PLTOUT  had  constructed  an  outer  integrand  plot),  SETQRF 
is  called  with  I5ET«1  so  that  the  operator  is  asked 
to  specify  the  plot  size.  On  the  first  call  to  SETPLT 
the  operator  is  advised  of  the  and  ranges  and  asked 
to  specify  the  plot  ranges  for  these  variables  and 
suitable  numbers  of  interval  markers  for  the  plot 
space  annotation  (see  SETQRF).  The  number  of.  Intervals 
la  selected  by  specifying  a  suitable  'step  size'  for 
each  variable. 
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liii)  Scale  factors  are  computed  and  the  origin  reset  so 
that  the  bottom  left  hand  corner  of  the  plot  space 
corresponds  to  the  point  defined  by  the  minimum  values 
of k. and  j?  selected  by  the  operator.  The  scale  factor 
used  by  the  plotting  software  is  sat  so  that  future 
plotting  can  be  done  directly  in  terms  of<and{S. 

The  subroutine  SCLFCT  is  called  to  set  scaling  parameters 
used  by  SMOOTH. 

(iv)  A  representation  of  the  maximum  possible  limits  for 

the  integration  domain  for  cracked  structures  is  constucted 
using  the  lines  ?=V  **^rtn/W) 

4,1(1 

Prompts 

(i)  'INITIALISE  INTEGRAND  PLOTS' 

'BETA  VALUES  BETWEEN  ***•  AND  ••**' 

'BET AMIN, BETAMAX, BETASTEP ' :  Request  for  the  range  of  ^ 
to  be  used  to  set  up  the  plot  space  and  the  interval  to 
be  used  between  'tic  marks '  on  the  ^  axis. 

(ii)  'ALPHA  VALUES  BETWEEN  *♦**  AND 

'  ALPMIN,  ALP  MAX,  ALP  STEP ' :  Request  for  the  range  of  at  to  be 
used  to  set  up  the  plot  apace  and  the  interval  to  be 
used  between  'tic  marks'  on  the  oc  axis. 

Common  variables  changed 
INP:  Graph  counter. 

XVAR:  Array  of  parameters  for  horizontal  axis. 

YVAR:  Array  of  parameters  for  vertical  axis. 


9.10.4.  Graphics  support  subroutines 


The  subroutines  described  in  this  Section  provide  basic 
graphics  support  as  described  below. 

(i)  Initialisation  of  a  plot  area. 

Each  graphical  construction  requires  a  'plot  space* 
to  be  initialised.  The  subroutine  SETGHF  performs  this 
task  and  is  used  by  the  graphical  routines  in  NKRF  and 
NEBPLT.  As  currently  configured,  the  graphs  are  drawn 
to  fit  on  A4  size  'pages'. 

• 

(ii)  Smoothing  and  line  coding 

The  subroutine  SMOOTH  allows  a  certain  amount  of  smoothing 
to  be  applied  to  a  curve  defined  by  a  sequence  of  line 
segments,  A  by-product  of  this  process  is  the  ability  to 
draw  the  smoothed  line  as  a  broken  line  with  variable 
mark-space  ratios.  This  facility  is  used  by  NERF  to 
draw  smooth  representations  of  the  constant  R  lines  on 
the  integrand  maps  and  to  provide  line  coding  which 
is  used  by  NERPLT  to  distlguish  between  functions. 

Subroutine  SMOOTH  is  supported  by  the  subroutines  PLOTD 
and  SCLFCT. 

(ill)  Conversion  of  numbers  to  character  strings 


The  annotation  of  a  graph  requires  the  conversion  of 
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mubars  to  character  strings.  This  facility  is  provided 
by  the  subroutine  FSIZS. 
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SUBROUTINE  FS IZE (ARG , TXT , LENGTH  ) 

Function 

FSIZE  converts  a  number  stored  in  ARG  to  a  text  string 
suitable  for  display  on  a  plot.  The  main  task  executed  by  FSIZE 
is  the  selection  of  an  appropriate  format  for  the  number. 

Operation 

ARG:  A  real  number  for  conversion  to  a  text  string. 

TXT:  Array  into  which  the  text  string  will  be  returned  to 
the  calling  code. 

LENGTH:  The  number  of  characters  returned  in  TXT. 

Operation 


The  format  is  selected  according  to  the  following  rules. 

(i)  ARG  ■  0 

The  format  selected  is  F4.1. 

(ii)  10~5<  ARG  <105 

Fixed  decimal  format  is  used.  The  format  is  F(L).(INDD) 
where 

L  -  INDF  +  INDD  +  2.  fd".  ZL7) 

INDF  is  the  number  of  digits  to  the  left  of  the  decimal 
point.  INDD  is  the  number  of  digits  to  the  right.  INDD 
is  chosen  such  that  a  maximum  of  NSIG  significant  digits 
are  used  to  represent  the  number  with  all  trailing  zeros 
suppresed.  NSIG  is  set  as  a  parameter  in  FSIZE. 
(Currently  NSIG  ’■  8.) 

If  ARG  is  negative  the  length  L  is  increased  by  1  to 
include  the  sign. 


S3J+ 

( iii)  ARG  >105  or  ARO  <10"5 

Exponential  format  is  used,  being  Ell. 4  if  the  number  is 
negative  and  E12.4  if  the  number  is  positive. 

Note  that  all  the  formats  allow  for  a  single  space  at  the 
front  of  the  text  string. 
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SUBROUTINE  PLOTD (X , Y , NPE  ) 


Function 

The  sole  function  of  PLOTD  is  to  provide  an  interface 
between  the  plotting  requirements  of  subroutine  SMOOTH  and 
the  subroutine  PLOT  provided  on  the  A.R.L.  DEC  system  10. 

Parameter  List 

X:'  X  coordinate  of  the  point  to  be  plotted. 

Y:  Y  coordinate  of  the  point  to  be  plotted. 

NPE:  Pen  control  parameter. 

■3,  Point  is  not  joined  to  last  point. 

■2,  Point  is  joined  to  last  point. 

Operation 

PLOTD  changes  the  pen  control  parameter  from  2  to  4  and 
provides  the  plot  logical  unit  number  (5)  for  transfer  to  the 
subroutine  PLOT. 


I 
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SUBROUTINE  SETGRF<LU,XVAR,  YVAR, LX, LY, TITLE, NX, NY, NT, ISET) 

Function 

The  subroutine  SETGRF  sets  up  a  plotting  area  on 
the  file  associated  with  the  logical  unit,  LO.  The  plotting 
area  is  a  sab-area  of  a  page.  SETGRF  draws  an  outline  of 
the  plotting  area,  annotates  the  axes  and  exits  with  the 
origin  set  at  the  bottom  left  hand  corner  of  the  plotting 
area  and  plotting  coordinates  scaled  so  that  one  unit  corresponds 
to  one  inch  on  the  plot. 

Parameter  List 

LO:  Logical  unit  number. 

XVAR:  Array  containing  three  variables: 

XAR( 1)  Minimum  value  for  the  coordinate  represented 
by  the  horizontal  axis. 

XAR(2)  Maximum  value  for  the  coordinate  represented  by 
the  vertical  axis. 

XAR(3)  Size  of  interval  between  'tic'  marks  on 
the  horizontal  axis. 

YVAR:  Array  containing  three  variables  as  described  above 
for  XVAR,  but  pertaining  to  the  vertical  axis. 

LX:  Character  string  defining  a  label  for  the  horizontal 
axis. 

LX:  Character  string  defining  a’label  for  the  vertical 
axis. 

TITLE:  Character  string  defining  a  title  for  the  plot. 

NX:  Number  of  characters  in  the  string  in  LX. 

NY:  Number  of  characters  in  the  string  in  LY. 

NT:  Number  of  characters  in  the  string  in  TITLE. 

ISET:  If  ISET  is  non  zero,  SETGRF  will  ask  the  operator 
to  specify  the  plot  size. 

If  ISET  is  zero,  the  operator  will  not  be  asked  and 
SETGRF  will  use  the  parameters  established  during  a 
previous  call. 
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Operation 

SETGRF  establishes  a  plot  area  according  to  the  variables 
defined  in  Figure^34.  The  size  of  the  page  (XLR  x  YLR)  and 
the  mini  sum  margins  (XMARH,XMARL,  YMARH  and  YMARL)  are  defined 
with^the  subroutine  and  are  currently  set  to  correspond  to 
an  A4  page.  IC  is  set  to  correspond  to  the  outer  extremities 
of  marks  that  are  drawn  on  the  plot  to  delimit  each  A4  page: 
the  size  of  these  marks  is  set  by  BIT.  The  title  is  positioned 
above  the  plot  area  by  a  distance  determined  by  YTITLE. 

Other  parameters  set  within  SETGRF  are:  CHHBIT,  half  the  size 
of  the  smallest  character  drawn  by  the  plotting  software  supplied 
by  the  system;  MAG,  the  magnification  of  that  character  size  to 
generate  the  numerical  labels  for  the  coordinate  axes,  and 
SMALL,  the  length  of  the  'tic  marks'  placed  on  each  axis. 

For  reference,  a  typical  plot  initialised  by  SETGRF 
is  shown  in  Figure  07. 

The  initialisation  process  follows  the  following  sequence. 

(i)  If  ISET  is  non-zero,  the  operator  is  asked  to  specify 
the  size  of  the  plot  in  inches.  This  action  specifies 
values  for  XL  and  YL.  From  these  values  the  variables 
XD  and  YD  are  calculated  so  that  the  plot  space  is  positioned 
centrally  in  the  vertical  direction  and  right  justified 
against  the  margin  in  the  horizontal  direction. 

(ii)  On  entry,  the  plotter  pen  is  moved  to  the  midpoint  of 
the  left  hand  edge  of  the  page.  The  A4  separating 
marks  are  then  drawn. 

(ill)  The  outline  of  the  plot  space  is  constructed  and  the 
origin  shifted  to  the  bottom  left  hand  corner. 

(iv)  The  title  is  placed  centrally  above  the  plot  space. 

(v)  The  limits  of  the  horizontal  axis  are  annotated  with 
representations  of  the  values  specified  by  XVAR. 
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Figure  5.36.  Program  variable  names  and  their  associated 
measurements  as  used  by  SETGRF  to  set  up 

a  plot  space. 
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(vi)  Vertical  'tic  marks'  are  inserted  along  the  horizontal 
axis.  The  number  of  marks  is  set  by  the  size  of  the 
interval  specified  by  XVAR(3).  If  XVAR(3)  *0,  10  intervals 
are  used  by  default.  The  number  of  intervals  is  limited 
to  20. 

(vii)  The  label  for  the  horizontal  axis  is  placed,  centrally 
below  the  plot  space. 

(viii)  Operations  (v)  to  (vii)  are  repeated  for  the  vertical 
axis.  This  timet  each  'tic  mark'  is  annotated  with  a 
representation  of  the  numerical  value  of  the  coordinate 
at  that  location  on  the  vertical  axis. 

Note  that  the  character  strings  representing  values  on  the 
coordinate  axes  are  produced  by  the  subroutine  FSIZE. 

The  example  given  in  Figure  S’.SJvbb  produced  by  a  call  of  the 
form, 

CALL  SETGRF(5,XVAR,YVAR, 'BETA', 'F(BETA)', 'UM324  RSLT  TERM' ,4,7, 15, 1) 

with  XVAR( 1 ) =  0,  XVAR(2) s  5000,  XVAR(3)«I00Q,YVAR(  1 )  *  O,  YVAR(2)»  5e-8 
and  YVAR(3)sle-5  The  operator  chose,  XL  *  4,  YL*3»5. 

Prompts 

(i)  'LENGTH  OF  X  AXIS  (INCHES)':  Request  for  XL. 

(ii)  'LENGTH  OF  Y  AXIS  (INCHES)':  Request  for  YL. 

Common  Variables  Changed 

XO:  Minimum  value  for  x  for  coordinate  system  for  plot  space 
(set  to  0). 

XL:  Maximum  value  for  x  for  plot  space  coordinates. 

YO:  As  for  XO,  but  for  y. 

YL:  As  for  XL,  but  for  y. 


SUBROUTINE  SCLFCT (LU , S X, SY ) 
Function 


The  subroutine  SMOOTH  requires  the  current  scale  factors 
that  are  in  use  by  the  plotting  system  to  be  stored  in  the 
COMMON  block  SMTHSC.  Subroutine  SCLFCT  estimates  those  scale 
factors  and  transfers  them  to  the  COMMON  block*  The  scale 
factors  are  also  returned  to  the  calling  code  via  the  parameter 
list . 

Parameter  List 

LU :  Logical  unit  number  for  the  plot  file. 

SX:  Scale  factor  for  X  as  transferred  to  COMMON. 

SY:  Scale  factor  for  Y  as  transferred  to  COMMON. 
Operation 

The  scale  factors  are  estimated  by  moving  the  plotter  a 
fixed  distance  and  accessing  the  plot  software  to  find  the  real 
coordinates  of  the  end  points  of  movement.  On  the  DEC  system 
10,  the  real  coordinates  are  returned  by  the  subroutine  WHERE 
and  the  movement  is  effected  by  calling  PLOT  with  integer 
arguments  of  100  for  X  and  Y.  This  results  in  a  pen  movement  of 
l  inch  in  each  direction.  A  call  with  X  and  Y  equal  to  -100 
restores  the  plotter  to  the  position  prior  to  the  call  to 
SMOOTH. 
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SUBROUTINE  SMOOTH (XP , YP , NPE , IDOT ) 
Fun  c  tlon 


Subroutine  SMOOTH  provides  a  curve  smoothing  facility  for  a 
line  defined  by  a  sequence  of  data  pairs  (XP,YP)  to  which 
SMOOTH  has  access  only  at  the  time  of  call. 

A  secondary  function  (but  the  primary  use  made  by  NERF)  is 
to  provide  line  coding  facilities  by  inserting  breaks  in  the 
line  according  to  the  code  in  IDOT. 

Parameter  List 

XP s  X  coordinate  of  the  point  on  the  line. 

YP s  Y  coordinate  of  the  point  on  the  line. 

NPE:  PLot  control  parameter. 

-2,  Point  is  joined  to  the  last  point  received  by 
SMOOTH. 

■3,  Point  is  not  joined  to  the  last  point  received  by 
SMOOTH,  (i.e.  point  is  the  first  point  of  a  new  line.) 

-A,  Point  is  the  last  point  of  closed  curve. 

*5,  Current  line  is  complete;  XP  and  YP  do  not  define  a 
new  point . 

“6,  Smooth  asks  the  operator  to  specify  a  new  smoothing 
(or  line  break)  interval. 

IDOT:  Line  coding  control  parameter. 

■0,  Line  is  solid.  No  breaks  are  inserted. 

>0,  Line  is  broken.  Breaks  equal  to  the  current 
smoothing  interval  are  Inserted  between  solid  sections 
that  are  ID0T*(the  smoothing  interval)  long. 
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<0,  As  above  buC  each  second  solid  section  is  only  one 
smoothing  interval  long .  (i.e.  dash-dot  lines  are 
drawn • 

<-19,  No  smoothing  is  selected.  The  line  is 
constructed  in  the  same  way  as  if  the  normal  plot 
routines  had  been  called  directly. 

Operation 


The  smoothing  process  used  by  SMOOTH  is  based  on  fitting 
cubic  polynomials  through  the  data  points  in  such  a  way  that 
the  resulting  line  has  tangential  continuity  at  each  pblnt. 
Because  SMOOTH  does  not  retain  all  the  data  pairs  defining  a 
continuous  line,  the  resulting  curve  is  close  to  but  not 
equivalent  to  a  cubic  spline. 

The  points  created  during  the  smoothing  process  are  spaced 
at  approximately  equal  intervals  along  the  line  and  hence  line 
coding  is  is  a  facility  which  can  be  included  for  a  trivial  cost 
in  terms  of  coding  complexity. 

The  smoothing  interval  and  hence  the  break  interval  is 
specified  in  terms  of  plot  Inches.  This  interval  is  set  during 
the  first  call  to  SMOOTH  by  the  same  interactive  dialogue  which 
changes  the  interval  in  response  to  a  call  with  NPE»6.  Because 
the  plot  routines  may  have  implicit  scale  factors  operative, 
scale  factors  for  X  and  Y  are  assumed  to  be  available  in  SCX  and 
SCY  in  the  COMMON  block  SMTHSC.  If  these  factors  are  1  or  0, 
the  scale  factor  logic  is  bypassed.  (Subrouine  SCLFCT  can 
provide  the  current  scale  factors  if  required.) 

Note  that  all  calls  to  the  plot  software  are  via  the 
subroutine  PLOTD  so  that  SMOOTH  is  independent  of  the  plot 
system  on  which  NERF  is  installed. 
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(i)  'SMOOTHING  INTERVAL'S  Prompt  issued  by  the  section  of 
code  which  provides  the  facility  for  changing  the 
smoothing  interval. 
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5.10.5.  The  graphics  post  processor  NERPLT 

The  program  NERPLT  was  designed  primarily  for  constructing 
graphs  of  the  reliability  functions  calculated  by  NERF.  These 
functions  are  written  by  NERF  into  a  file  that  has  essentially 
the  same  format  as  the  function  files  used  to  define  the  input 
functions.  It  was  thus  a  trivial  matter  to  modify  NERPLT  so  that 
it  could  plot  a  graph  defined  by  any  function  file  so  that,  in 
principle,  the  input  functions  could  also  be  plotted.  Subsequently, 
this  facility  was  extended  by  allowing  NERPLT  to  access  the  various 
functions  in  NERF  to  construct  the  input  functions  (including 
those  that  do  not  rely  on  function  files)  directly. 

NERPLT  now  provides  facilities  for  constructing  graphs 
of  the  NERF  input  functions,  including  the  density  functions, 
together  with  any  functions  represented  by  function  files.  The 
latter  functions  can  be  mixed  on  a  single  graph  to  produce  a 
'multi-function'  plot.  A  multi- function  plot  uses  the  first  function 
as  a  basis  for  setting  up  the  graph  and  establishing  scale  factors. 
Subsequent  functions  are  plotted  using  the  established  plot 
space  and  the  same  scale  factors.  In  this  way,  the  results  from 
several  runs  of  the  program  NERF  can  be  presented  on  the  same 
graph. 


Examples  of  the  output  produced  by  NERPLT  were  given  in 
Chapter  3  when  describing  the  input  functions  and  the  various 
inspection  procedures  modelled  by  NERF. 
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It  is  not  intended  that  the  documentation  presented  here 
is  complete)  especially  in  terms  of  the  operation  and  prompt 
messages  issued  by  NERPLT.  These  details  are  covered  more 
completely  by  Hallinson  and  Graham  The  documentation  presented 
here  covers  the  operation  of  the  various  subroutines  which  are 
not  described  in  the  user  manual. 

The  operational  aspects  of  NKBPLT  are  determined  by  the 
main  program,  PROGRAM  NERPLT  which  executes  the  tasks  portrayed 
schematically  in  Figure  5.38.  The  subroutine  REAEMF  reads  the 
function  files  and  the  subroutine  FPLOTS  uses  the  NERF  functions 
to  set  up  sequences  of  ordered  pairs  that  represent  the  input 
functions. 

Note  that  the  subroutine  FPLOTS,  in  effect,  constructs 
a  sequence  of  ordered  pairs  which  represents  the  interpolated 
function  derived  from  the  function  file  data  for  input  functions 
so  defined.  The  graphical  output  is  thus  a  way  of  checking 
the  performance  of  the  interpolation  procedures.  The  subroutine 
FPOINT  constructs  graphical  representations  of  the  points 
actually  used  to  define  one  of  these  functions.  (See  Figure 
3. 1,  for  example. ) 

Plotting  a  sequence  of  ordered  pairs  is  controlled  by  the 
subroutine  PLTS.  Because  NSRPLT  allows  the  user  to  define  the 
scale  factors  and  plot  limits,  the  data  must  be  Hrindowed*  so 
that  the  portion  of  the  function  that  fits  within  the  plot  space 
is  the  only  section  of  the  function  actually  plotted.  This 
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windowing  facility  is  provided  by  the  subroutines  WINDOW, 
and  COMPRS. 


The  rest  of  the  code  used  by  NERPLT  is  supplied  by  the  t 

REEF  library  of  subroutines.  Note  that  the  current  implementation 
of  NERPLT  contains  special  forms  of  the  subroutines  PROMPT  and  ECHO. 

These  routines  do  not  write  any  information  to  the  secondary 

output  file  as  is  the  case  for. the  routines  in  the  main  NEW 

library.  If  a  record  of  the  dialogue  is  required,  these  subroutines  i 

could  be  modified  accordingly. 


j 

! 

i 

(I 

a 


5'  U  <? 


PROGRAM  NERPLT 


Function 


Program  NERPLT  provides  an  interactive  facility  for  the 
construction  of  graphs  of  the  NERF  input  functions  and  the  reliability 
functions  computed  by  NERF. 

Operation 

The  sequence  of  operations  controlled  by  NERPLT  is  described 
schematically  in  figure  5.38.  The  code  broadly  follows 
the  logic  shown  in  that  Figure  which  together  with  the  operational 
description  given  by  Malllnson  and  Graham 1 ^  should  be  sufficient  for 
a  FORTRAN  programmer  to  understand  the  code.  The  following 
points  are  worthy  of  mention. 

(i)  The  logical  variables  listed  below  are  used  to  control 

the  sequence  of  operations. 

MPLT:  If  true,  the  mult-function  plot  facility  has  been 

selected. 

ADDPLT:  If  true,  the  next  function  will  be  added  to  the 
existing  graph. 

FPLTS:  The  current  graph  is  a  NERF  input  function. 

Multi- function  plots  are  not  permitted  if  this 
la  the  case. 

If  true,  at  least  one  graph  has  been  initialised 
so  that  basic  input/output  operations  have  been 
performed. 
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TIME:  If  true,  and  the  graph  is  multi-function,  the 

current  function  is  the  first  on  the  graph. 

Cii)  The  SERF  input  functions  are  initialised  by  calling 
GFIN  which  reads  the  control  file  and  initialises  the 
density  functions  and  the  various  functions  that 
are  defined  by  function  files.  In  this  way,  the  input 
files  pertain  to  the  run  defined  by  the  current  control 
file. 

till)  The  output  file,  containing  the  graphical  information, 
has  the  name  ' NAME.  IPT 1  where  the  string  ; 
denoted  by  SAME  depends  on  the  first  function  actually 
plotted.  If  the  first  function  is  one  of  the  input 
functions,  NAME  corresponds  to  the  run  Identification 
in  the  control  file;  otherwise  it  corresponds  to  the 
name  of  the  first  file  read  by  REAJMF. 

(lv)  The  subroutine  README  is  similar  to  READFN  described  in 
Section  5*9.3,  with  the  exceptions  that  the  operator  is 
asked  to  specify  the  file  name  for  the  function  file 
and  that  several  columns  of  data  can  be  read  from  the  file 
and  are  Interpreted  a a  defining  several  functions  for  the 
same  set  of  argument  values. 
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SUBROUTINE  COMPRS( X, Y, XI , Y1) 

Function. 

Given  a  point  iX,  Y)  inside  the  plot  space  and  a. point 
1X1,11)  outside  the  plots  space,  COMPRS  finds  the  coordinates 
of  the  intersection  of  the  line  joining  (.X, I)  and  (XI, ll)  with 
a  boundary  of  the  plot  space. 

Parameter  List 


X:  X  coordinate  of  the  point  inside  the  plot  space. 

Y:  Y  coordinate  of  the  point  inside  the  plot  space. 

XI:  X  coordinate  of  the  point  outside  the  plot  space. 

Returned  as  the  X  coordinate  of  the  intersection  point. 

Y1:  Y  coordinate  of  the  point  outside  the  plot  space. 

Returned  as  the  Y  coordinate  of  the  intersection  point. 

Operation 

The  line  joining  (X,Y)  and  (XI, Y1 )  is  compressed,  first 
in  the  X  direction,  by  computing  the  intersection  with  x-^XO  or 
x»XL.  It  is  then  compressed  in  the  y  direction  by  computing  the 
intersection  with  y  «Y0  or  y«YL, 
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SUBROUTINE  FPLOTS(LU, IFUNC, XMIN, XMAX, YMIN, YMAX, XLAB, YLAB, X, FY) 
Function 

The  subroutine  FPLOTS  sets  up  a  sequence  pf  ordered 
pairs  of  argument  and  function  values  of  one  of  the  NERF  input 
functions.  This  sequence  is  intended  for  subsequent  plotting 
by  NERPLT,  and  is  sufficient  to  define  a  smooth  curve  representing 
the  function.  The  generated  sequence  is  not  the  same  as  that 
which  may  be  used  to  define  an  interpolated  function. 

Parameter  List 


LU:  Logical  unit  number  for  the  plot  file,  (not  used). 

IFUNC:  Integer  defining  the  input  function  .  (See  paramter 
list  for  FUNCi )  Returned  to  calling  coda. 

XMIN:  Lower  limit  for  the  range  of  the  argument,  returned 
to  calling  code. 

XMAX:  Upper  limit  for  the  range  of  the  argument,  returned 
to  calling  code. 

YMIN:  Lower  limit  for  the  range  of  the  function,  returned 
to  calling  code. 

YMAX:  Upper  limit  for  the  range  of  the  function,  returned  to 
'calling  code. 

XLAB:  Label  for  the  horizontal  axis  of  the  graph,  returned  to 
calling  code. 

YLAB:  Label  for  the  vertical  axis  of  the  graph,  returned  to 
calling  code. 

X:  Array  containing  the  generated  argument  values,  returned 
to  calling  code. 

FY;  Array  containing  the  generated  function  values,  returned 
to  calling  code. 


Operation 

The  operator  is  asked  to  select  an  input  function.  A 
valid  function  must  be  selected  and  the  program  will  loop 
until  a  correct  entry  is  made  by  the  operator. 

Once  an  input  function  has  been  selected,  its  range 
is  determined  and  values  for  XMIN,  XMAX,  YMIN, YMAX  computed. 

The  sequence  of  ordered  pairs  is  then  generated  in  a  straightforward 
manner.  Note  that  if  a  logarithmic  plot  has  been  selected  that 
logarithms  of  the  function  are  taken  before  the  sequence  is  returned 
to  the  calling  code. 


Currently  200  ordered  pairs  are  used  to  define  the  function. 

If  a  density  function  is  selected  and  the  associated 
random  variable  is  being  neglected  from  the  model,  the  sequence 
is  not  generated  and  IFUNC  is  returned  with  the  value,  99. 
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SUBROUTINE  FPOINT(LU, XVAR, YVAR,IFUNC) 

Function 

FPOINT  constructs  representations  of  the  locations 
of  the  nodes  used  to  define  the  NERF  input  functions.  In  the 
current  implementation  the  nodes  are  represented  by  small  squares 
centred  .at  the  points  defined  by  the  sequence  of  ordered  pairs 
of  argument  and  function  values  upon  which  each  input  function 
is  based. 

Parameter  List 


Lff:  Logical  unit  number  for  the  file  containing  the  graphical 
output. 

XVAR: .  Array  containing  the  minimum  value,  maximum  value  and 
increment  for  axis  marking  for  the  argument. 

YVAR:  Array  containing  the  minimum  value,  maximum  value  and 
increment  for  axis  marking  for  the  function. 

IFUNC:  Integer  identifying  the  input  function. 

1.  Risk  rate  function,  rgCR)  *  P^CR).^. 

2.  Relative  strength  function  ,  'p(t). 

5.  Crack  growth  function,  a(£). 

6.  Inverse  crack  growth  function,  a”1 (a). 

8.  Strength  decay  function,  R(a). 

Operation 

The  assumption  is  made  that  the  graph  has  been  initialised 
and  the  contents  of  XVAR  and  YVAR  are  correct  for  the  function 
being  plotted.  Each  function  is  treated  separately.  The  appropriate 
array  of  argument  values  (e.g.  BETA  for  t  values  for  f(t))  is 
accessed.  For  each  argument  value,  the  corresponding  function 
value  is  evaluated  and  the  point  constructed  if  within  the  confines 
of  the  graph,  as  determined  by  the  parameters  XO,  XL,  YO  and  YL  in 
the  common  block  AREAXY. 
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FUNCTION  FUNC(X, IFUNC) 

Function 

The  function  FUNC  returns  a  value  of  an  input  function 
for  a  given  value  of  the  argument,  X.  The  particular  input 
function  is  selected  by  the  value  of  the  parameter  IFUNC.  This 
function  helps  make  higher  levels  of  the  graph  plotting  software 
less  dependent  on  the  precise  input  function  selected. 

Parameter  List 


X:  Value  of  the  argument  for  which  the  function  evaluation 
is  required. 

IFUNC:  Integer  defining  the  input  function. 

1.  Risk  rate  function,  r2(R). 

2.  Relative  strength  function  y'(t). 

3.  Density  for  virgin  strength  P^C<). 

4.  Density  for  age,  p^). 

5.  Crack  growth  function,  a(t). 

6.  Inverse  crack  growth  function,  a-1 (a). 

7.  Density  for  initial  crack  length  p  (a-). 

a0  u 

8.  Strength  decay  function,  R(a). 

Operation 

FUNC  simply  calls  the  appropriate  function  sub-program 
to  evaluated  the  function  selected  by  IFUNC. 


SUBROUTINE  PLTS(XA,F, NUM, DOTS) 


Function 

The  subroutine  PLTS  controls  the  plotting  of  the  curve 
defined  by  the  sequence  of  ordered  pairs  stored  in  XA  and  F. 

Parameter  List 

XA:  Array  of  values  of  the  argument,  or  variable  corresponding 
to  the  horizontal  axis  of  the  graph. 

F:  Array  of  values  of  the  function,  or  variable  corresponding  to 
the  vertical  axis  of  the  graph. 

NUM:  Number  of  ordered  pairs  defining  the  curve. 

DOTS:  Parameter  controlling  the  line  code  used  for  the  curve. 

=0,  the  line  Is  solid. 

>0,  Line  is  broken  with  every  second  solid  section 
being  DOTS  times  as  long  as  the  intervening  breaks. 

<0,  Line  is  broken.  Solid  sections  are  DOTS  times  as 
long  as  the  intervening  breaks. 

This  convention  Is  similar  to  that  used  for  subroutine 
SMOOTH  with  the  exception  that  the  sign  of  the  control 
parameter  is  reversed. 

The  curve  is  constructed  by  a  sequence  of  calls  to  WINDOW 
followed  by  a  final  call  to  SMOOTH  with  NPE*5*  to  complete  the 
curve  (see  documentation  for  SMOOTH.  ) 

If  two  adjacent  values  of  XA  are  identical,  then 
pen  up  lstructions  are  issued  to  WINDOW  to  ensure  that  a  possible 
discontinuity  in  the  function  is  properly  represented. 
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SUBROUTINE  WINDOW(X, Y, NPE, IDOT) 

Function 

The  subroutine  WINDOW  provides  a  windowing  facility 
whereby  a  sequence  of  plotted  points  can  be  vignetted  by  imposed 
limits  for  plotting.  If  the  sequence  of  points  represents  a 
continuous  line  sequence,  WINDOW  ensures  that  the  segment  between 
a  point  within  the  'window'  and  one  outside  is  correctly 
drawn  so  that  it  appears  to  be  'cut'  by  the  plot  boundary. 

The  subroutine  is  called  instead  of  the  usual  plotting 
routines,  or  the  subroutine  SMOOTH.  These  routines  are  called 
by  WINDOW  after  the  dipping  process  has  been  completed. 

Parameter  List 

X:  X  coordinate  of  the  next  point  to  be  plotted. 

I:  I  coordinate  of  the  next  point  to  be  plotted. 

NPE:  Pen  control  parameter. 

a  2,  the  point  defined  by  (X,  I)  is  joined  to  the  last 
point. 

iZ,  the  point  defined  by  (X,Y)  is  not  joined  to  the 
last  point. 

All  other  values  of  NPE  are  ignored  and  are  passed 
directly  to  SMOOTH. 

IDOT:  Line  coding  parameter.  Passed  directly  to  SMOOTH: 
refer  to  the  documentation  for  that  subroutine  for 
details. 

The  coordinate  limits  for  the  plot  space  are  assumed  to 
be  initialised  and  stored  in  the  common  block  AREAXY.  The 
limits  for  x  are  defined  by  XO  and  XL  and  those  for  y  by  YO  and 
YL. 
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The  point  (X,  7)  Is  tested  against  the  coordinate  Halts 
and  the  following  conditions  are  Identified. 

(>1)  (X,  I)  Inside  window;  last  point  Inside.  Ho  window  operation 
Is  required.  IX, T)  is  stored  as  1X2,12)  for  later  use. 

Ill)  (X, 7)  inside  window;  last  point  outside.  If  points  are  joined, 
use  COMPRS  to  find  the  Intersection  of  the  line  joining 
lX 1,71)  and  (X,7)  with  a  boundary  of  the  plot  space.  Plot 
the  Intersection  with  a  pen  up  Instruction  and  draw  the 
line  joining  It  to  the  point  IX, 7).  Store  lX,7)  as  (X2,72). 

(ill)  (X,7)  outside  window;  last  point  Inside.  If  points  are 
joined,  call  COPMRS  to  find  the  point  of  intersection 
of  the  line  between  (X2,72)  and  (X,7)  with  a  boundary  of 
the  plot  space.  Draw  the  line  between  (X2,T2)  and  that 
point.  Store  (X,7)  as  (XI, 71). 

(lv)  (X,  X )  outside  window;  last  point  outside,  store  (X,7)  as 
(XI, 71). 

Local  variables  in  WIHSOW  have  the  following  neanings. 

XI ,71  Coordinates  of  the  last  point  outside  the  window. 

12, x2  Coordinates  of  the  last  point  inside  the  window. 

X3,73  Coordinates  of  the  intersection  of  the  line  leaving 
the  window  and  a  boundary  of  the  plot  space. 

I COMP  Flag  indicating  whether  the  current  point  is  the 
first  of  a  sequence  of  points  inside  the  window. 

(ICOMPtO,  point  is  the  first  outside;  I COMP  *  1,  point 
is  not  the  first  outside.) 


The  data  preparation,  program  NERPRE  la,  in  fact,  additional 


to  the  easential  requirements  for  the  operation  of  NERF.  The 
control  file  and  function  filea  can  be  prepared  ualng  the  text 
editing  facllltiea  provided  by  the  operating  ayatea  on  which 
NERF  la  installed.  NERPRE  provides  an  alternative  method  for 
the  preparation  of  input  data  which  has  the  advantage  that 
the  user  does  not  have  to  learn  how  to  operate  the  text  editor 
or  the  format  requirements  of  the  control  and  function  files. 

As  was  the  case  with  NERPLT,  much  of  the  operational  details 
of  NERPRE  are  described  in  the  user  manual  (Mallinson  and  Graham1^). 
The  documentation  presented  here  concentrates  on  details  of  the 
subroutines  not  covered  by  the  user  manual.  .  The  documentation 
is  not  Intended  to  be  complete,  but  should  be  sufficient  for 
a  FORTRAN  programmer  to  understand  the  code. 

Much  of  the  operational  character  of  NERPRE  is 

determined  by  the  code  in  the  main  program,  PROGRAM  NERPRE, 
which  is  structured  to  provide  multiple  options  which  are 
selected,  one  at  a  time,  by  the  user.  The  essential  operations 
are  shown  schematically  in  Figure  5.39.  Th®  subroutine  SELECT 
performs  the  ta*ks  of  asld.ag  the  user  to  specify  the  next  action 
to  be  taken,  identifying  the  action  and  returning  a  flag  whith 
a  value  that  can  be  used  by  PROGRAM  NERPRE  to  jump  to  the  appropriate 
section  of  coda.  When  the  action  is  finished,  control  returns  to 
the  point  where  the  subroutine  SELECT  is  called  to  choose  a  new 


action. 


When  the  program  first  starts  ezecutuion,  a  cheek 
that  a  control  file  already  exists  is  made.  If  a  file  does  not 
exist,  NERPRE  executes  every  data  preparation  action  to  create 
an  appropriate  set  of  data  before  calling  SELECT.  This  alternative 
mode  of  operation  is  controlled  by  the  logical  variable  EDIT  which 
If  false  supresses  the  return  to  the  call  to  SELECT  after  each 
action.  Instead  control  passes  to  the  next  section  of  code.  This 
continues  until  the  last  action  has  been  made  and  control  unconditionally 
returns  to  the  subroutine  SELECT.  This  'non-editing'  mode  can  also 
be  invoked  by  the  user  selecting  the  option  'HEW  FILE*  which  results 
In  EDIT  being  set  false  as  If  a  control  file  did  not  exist. 

An  exception  to  the  simple  process  illustrated  in  Figure  5.39 
occurs  if  the  option  'FUNCTION  FILE*  is  selected.  The  operation 
in  NERPRE  follows  the  simple  sequence  of  performing  an  action 
and  returning  to  call  SELECT.  However,  the  subroutine  FCNFIL, 
which  is  called  in  the  process,  contains  its  own  set  of  options 
and  executes  a  selection  process  which  to  the  user  appears  as 
a  sub-set  of  the  overall  option  selecting  process.  While  in 
FCNFIL,  none of  the  general  options  are  available  and  while 
in  PROGRAM  NERPRE,  non  of  the  options  in  FCNFIL  are  accessible. 

Another  exception  is,  of  course,  the  code  associated  with  the 
option  'FINISH*.  The  subroutine  CFOUT  is  called  to  write  a  new 
control  file  and  the  execution  of  NERPRE  ceases. 

PROGRAM  NERPRE  and  the  subroutine  SELECT  provide  most  of 
the  option  selecting  and  control  logic.  These  two  code  modules  are 


described  in  this  Section.  The  subroutines  associated  with  the 
preparation  and  editing  of  a  control  file  are  described  in 
Section  5*11.1  and  those  associated  with  the  preparation  of 
function  files  are  described  in  Section  5*11*2* 


PROGRAM  NERPRE 


Function 

PROGRAM  NERPRE  provides  an  interactive  Facility  for  the 
preparation  and  editing  of  control  and  function  files  for  input 
to  SERF. 

Operation 

As  described  in  the  text  of  Section  5. 11,  the  operation 
of  NERPRE  follows  the  simple  option  selecting  and  action  performing 
logic  shown  in  Figure  5*39.  The  heart  of  the  code,  as  far  as 
this  aspect  is  concerned  is. the  computed  GO  TO  statement  following 
the  call  to  SELECT.  The  text  identifying  each  option  is,  of 
course,  stored  within  SELECT.  However,  the  same  text  strings  have 
been  placed  in  comments  heading  each  section  of  code  to  make 
identification  of  the  code  as  so  elated  with  each  option  easy. 

The  object  of  the  editing  or  preparation  process  is  to 
ensure  that  the  variables  in  the  various  common  blocks  have 
the  correct  values.  These  variables  have  the  same  names  and  meanings 
as  those  used  in  NERF.  Input  from  and  output  to  the  control 
file  are  controlled  by  the  subroutines  CFIN  and  CFOOT  which 
are  supplied  by  the  NERF  library.  The  code  in  NERPRE  does  not, 
therefore,  directly  influence  the  format  of  the  control  file. 

The  code  associated  with  each  option  performs  the  allotted 
tasks  in  an  obvious  manner. 
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SUBROUTINE  SELECT( TXT, NCH, IOPT) 

Function 

The  subroutine  SEUECT  controls  the  selection  of  one  of 
the  options  provided  by  NERPRE  by  seeking  a  response  from  the 
operator  and  setting  IOPT  accordingly. 

Parameter  List 

TXT:  Character  string  containing  a  suitable  request  for 
an  operator  response. 

NCH:  Number  of  characters  in  the  string  stored  in  TXT. 

IOPT:  Integer  which  is  set  to  a  value  that  will  identify  the 
option  selected  by  the  operator. 

Operation 

The  possible  user  responses  are  stored  in  the  array 
RESPON.  Up  to  15  characters  can  be  used  to  identify  an  option. 
The  array  NCHR  contains  the  number  of  characters  actually  used 
to  identify  each  response. 

.  In  the  current  version,  the  response  is  tested  word  by 
word  rather  than  character  by  character  so  that  at  least  5 
characters  must  be  correct  for  a  response  to  be  Identified. 
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The  response  'LIST'  will  result  in  all  the  correct 
responses  being  listed  on  the  remote  terminal. 


Much  of  the  code  in  PROGRAM  NERPRE  Is  associated  with 
the  manipulation  of  the  data  in  the  common  blocks  that  will 
eventually  be  written  into  the  control  file  by  the  subroutine 
CFOUT.  A'  given  option  may  change  a  single  variable  or  a  whole 
group  of  variables,  depending  on  the  nature  of  the  data 
stored  in  those  variables. 

In  the  majority  of  cases,  the  subroutien  CHANGE  is  called 
to  manipulate  the  data.  This  subroutine  detects  whether  the 
logical  variable  EDIT  is  true  and  if  so  can  Inform  the  operator 
of  the  contents  of  the  variables  before  new  values  are  entered. 
CHANGE  is  actually  an  entry  point  in  the  subroutine  SELECT.  This 
means  that  the  text  stored  in  the  array  RESPON  is  available  for 
the  construction  of  the  prompt  messages. 

The  parameters  for  the  density  functions  are  manipulated 
by  the  subroutine  PDFCNG,  This  localises  the  code  associated  with 
the  density  functions  so  that  extensions  to  the  library  of 
standard  functions  evaluated  by  NERF  can  be  easily  extended. 

Some  variables,  such  as  the  run  identification  and  the 
logical  switches  are  manipulated  directly  by  code  in  NERPRE. 

It  is  assumed  that  the  operator  will  have  no  interest  in  the 
easting  values  of  these  variables  and  no  facility  for  informing 
the  operator  of  their  values  is  provided. 
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The  option  ' CHECK '  allows  the  operator  to  scan  all 
the  data  that  will  he  transferred  to  the  control  file.  The 
data  is  displayed  in  a  meaningful  way  on  the  remote  terminal 
by  the  subroutine  CHE(X. 

Nate  that  NERPRE  makes  liberal  use  of  the  subroutines 
TXTIN,  INTGIN,  RE ALIN  and  PROMPT  together  with  the  function 
INTEST.  These,  with  the  exception  of  PROMPT  are  obtained  from 
the  main  NERF  library. 

As  was  the  case  with  NESPLT,  NERPRE  has  its  own  versions 
of  PROMPT  and  ECHO  to  suppress  the  output  of  information  to 
the  secondary  file. 
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SUBROUTINE  CHANGE(TXT2, NCH2, VAR, NVAR, NTYPE) 

Function 

The  subroutine  CHANGE  controls  the  nanlpulatlon  of  the 
data  in  the  array  VAfi. 

Parameter  List 

TXT2 :  Text  string  Identifying  the  editing  operation. 

NCH2;  Number  of  characters  In  the  string  stored  in  TXT2. 

If  NCH2  is  zero,  the  indent! fi cation  prompt  may  be 
constructed  from  the  text  strings  stored  ln-.RESPON. 

( CHANGE  Is  an  entry  point  in  SELECT. ) 

VAR:  Array  containing  the  variables  to  be  changed. 

NVAR:  Number  of  variables  in  VAR. 

If  NVAR  Is  zero,  then  CHANGE  will  select  the  number 
of  possible  variables  from  information  stored  within 
, the  routine  and  accept  as  many  values  as  the  operator 
specifies. 

NTYPE:  Integer  identifying  the  editing  action.  (Generally,  it 
corresponds  to  the  value  of  IOPT  returned  by  SELECT.) 

Operation 

The  operation  of  the  subroutine  depends  on  the  status 
of  the  logical  variables  EDIT  and  VALUE. 

(1)  If  EDIT  is  false,  the  user  is  given  no  choice  and  the 
data  in  VAR  is  overwritten.  If  NCH2  is  zero,  the 
appropriate  text  string  in  RESPON  is  output  to 
identify  the  data  required. 

For  those  eases  where  the  required  data  are  a  sequence 
of  numerical  values  of  unspecified  number,  data  stored 


in  NVLIM  is  accessed  to  determine  the  maximum  permissible 
number.  The  subroutine  REALXN  is  then  used  to  interactively 
construct  the  sequence. 

Cii)  If  EDIT  is  true,  VALUE  is  accessed  and  if  required,  the 
existing  numerical  data  in  VAL  are  displayed  and  the 
operator  given  the  chance  to  negate  the  editing  action. 
Otherwise,  the  data  is  renewed  using  the  same  methods 
as  apply  when  EDIT  is  false. 
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SUBROUTINE  CHECK 

Function 

The  subroutine  CHECK  displays  the  information  that  sill 
be  written  to  the  control  file  in  an  informative  manner  on 
the  remote  terminal. 

Operation 

The  bulk  of  the  code  in  CHECK  is  concerned  with  the 
construction  of  prompts  which  will  inform  the  operator  of  the 
values  of  the  variables  in  the  common  blocks  that  are  accessed 
by  CFOUT.  These  prompts  are  designed  to  be  informative  in  a  way 
that  allows  a  ready  check  of  the  accuracy  of  the  data. 

The  amount  of  data  is  too  much  for  it  all  to  be  displayed 
on  a  VDU  screen  at  the  same  time.  CHECK  consequently  displays 
a  section  of  the  data  and  then  pauses,  waiting  for  a  user  response 
before  continuing.  This  pause  is  provided  by  the  subroutine 
PAUSCT.  It  is  envisaged  that  the  code  associated  with  effecting 
this  pause  could  be  machine  dependent  and  a  separate  subroutine 
was  provided.  The  subroutine  is  very  short  and  no  separate 
documentation  is  required. 
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SUBROUTINE  PDFCNG( TXTLAB, NCH,K, Cl ) 

Function 

The  subroutine  PDFCNG  provides  an  editing  facility  for 
the  parameters  defining  the  density  functions. 

Parameter  List 


TXTLAB:  Text  string  identifying  the  random  variable  for  which 
the  parameters  partain. 

NCH:  Number  of  characters  in  the  string  in  TXTLAB. 

K:  Integer  identifying  the  type  of  standard  density  function. 

1.  Log  normal. 

2.  Extreme  value. 

3.  Gamma. 

7 

Cl:  3  word  array.  » 

C1(1):  Dispersion  parameter  (k).  . 

C1(2):  Minimum  value  parameter  (e).  J 

C1(3):  Location  parameter  (v). 

] 

Operation 

The  logical  variables  EDIT  and  VALUE  are  accessed.  If 
both  are  true,  PDFOUT  is  called  to  display  the  parameters.  The 
operator  is  asked  if  the  existing  values  are  acceptable.  If  they  J 

are,  no  further  action  is  taken;  otherwise  the  operator  is 
asked  to  specify,  first  the  type  of  density  function  and  then  the  ] 

values  of  the  appropriate  parameters. 
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SUBROUTINE  PDFOUT(K.  Cl ) 

Function 

THe  subroutine  PBPOUT  display*  the  parameters  defiaiag 
a  density  function  oa  the  remote  terminal. 

Parameter  List 

K:  Int^er  defining  the  standard  distribution. 

1.  Log  normal. 

2.  Extreme  value. 

3.  Gamma. 

Ct:  3  word  array. 

C1(1)s  ntapersion  parameter 
C1(2):  Minimum  value  parameter  (e). 

Ci (3):  Location  parameter  (v). 

Q-paratlon 

PDFOUT  identifies  the  type  of  distribution  and  then 
constructs  an  appropriate  informative  message. 


6'  <fZ 


S’ 71.  '■ 


SOB ROUTINE  VALOUT( ARR, 5) 

Function 

The  subroutine  VALOUT  displays  the  mine ri cal  data  stored 
in  ARR  on  the  renote  terminal. 

Parana ter  List 

ARR:  Array  containing  data  to  be  displayed. 

N:  Number  of  variables  stored  in  ARR. 

Operation 

The  code  in  VALOOT  constructs  and  displays  pronpts  that 
are  appropriate  to  the  amount  of  data  stored  in  ARR. 
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5.11.2.  Preparation  of  function  files. 

The  preparation  of  function  files  is  controlled,  alaost 
entirely  by  the  subroutine  FCNFIL  which  is  called  by  NEHPRE 
in  response  to  the  selection  of  the  option  'FUNCTION  FILE*. 

FCNFIL  operates  a  sub-option  selection  process  which 
allows  function  files  to  be  created  or  edited.  The  format 
of  the  files  corresponds  to  that  specified  by  the  subroutine 
READFN  described  in  Section  5.9.3. 


On  entry  to  FCNFIL,  the  operator  is  ashed  to  select 
whether  an  existing  file  is  to  be  edited  or  a  new  one  created* 

In  the  first  case,  the  file  is  accessed  and  its  contents  read 
into  core.  In  the  second  case,  a  dialogue  proapts  the  operator 
to  enter  the  initial  set  of  data  for  the  new  file.  After 
receiving  the  header  text,  the  subroutine  DAXIN  is  called  to 
input  the  sequence  of  ordered  pairs. 

After  the  function  file  data  has  been  lnitialsed  by  the 
above  actions,  the  operator  is  advised  of  the  editing  options 
available.  These  are  described  in  the  description  of  the  subroutine 
FCNFIL  below. 

Note  that;  as  the  code  is  currently  constructed,  the  editing 
operations  can  only  operate  on  the  data  lnitialsed  as  FCNFIL  is 
entered.  To  change  the  data  by,  for  example  reading  a  new  file, 
the  option  'SAYS'  oust  be  selected  and  control  returned  to  the 
aain  program.  FCNFIL  can  then  be  re-entered  and  the  data  changed. 


SUBROUTINE  DATIN(X,F,NUM) 


Function 

The  subroutine  DAIIN  controls  the  entry  of  a  sequence 
of  ordered  pairs  from  the  keyboard  of  the  remote  terminal  or 
VDO. 

Parameter  List 

X:  Array  Into  which  the  values  of  the  argument  are 
stored  and  returned  to  the  calling  code. 

F:  Array  into  which  the  values  of  the  function  are 
stored  and  returned  to  the  calling  code. 

NUM:  Number  of  data  pairs  read.  Returned  to  the  calling 
code. 

Operation 

Subroutine  REALIN  is  used  to  read  a  single  pair  of  values 
of  argument  and  function.  If  the  value  of  the  argument  Is  99 
and  the  function  0,  the  sequence  is  terminated.  (Note  a  zero 
function  value  will  result  If  the  second  data  value  is 
omitted  by  the  operator  so  that  the  list  is  teiminated  by 
entering  99  on  the  keyboard. ) 

The  maximum  number  of  data  pairs,  is  set  within 
OATIN  at  150,  to  correspond  to  the  storage  allocated 
for  input  functions  in  NBRF. 
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SUBROUTINE  FCNFIL 

Function 

The  subroutine  FCNFIL  provides  an  interactive  facility  for 
the  preperatlon  and  editing  of  function  files. 

Operation 

The  operation  of  FCNFIL  centres  around  the  code  starting 
with  statement  number  80  which  prompts  the  operator  to  select 
one  of  the  available  options. 

Prior  to  reaching  this  statement,  the  data  for  the  function 
file  is  initialised  by  either  reading  an  existing  file  or 
entering  a  suitable  set  of  data  from  the  remote  terminal. 

The  options  and  the  facilities  they  then  provide  are  described 
below. 

(i)  INSERT 

A  continuous  block  of  ordered  pairs  can  be  inserted 
immediately  following  a  pair  which  is  identified  by 
specifying  the  value  of  the  argument* 

(11)  EELETS 

A  continuous  block,  of  ordered  pairs  starting  with 
a  pair  identified  by  the  argument  value  Caa  be  deleted. 


(ill)  CHANGE 


A  data  pair,  identified  .by  the  argument  value  can  be 
changed. 

(iv)  TITLE 

Selected  lines  of  the  title  can  be  re-inserted. 

(v)  CHECK 

The  contents  of  the  function  file  can  be  checked  by 

/ 

having  them  displayed  on  the  remote  terminal. 

Cvi)  SAVE 

The  file  can  be  saved  on  disk  and  the  operator  then 
has  the  option  of  returning  to  the  main  program  or 
continuing  the  editing  process  for  the  same  set  of 
data. 

(vil)  CANCEL 

The  option  'cancel'  allows  the  operator  to  abort  an 
editing  session  and  permits  immediate  return  to  the 
main  program.  The  operator  is  given  a  second  chance  to 
confirm  this  choice  as  a  return  to  the  main  program  will 
destroy  the  current  set  of  data. 

The  code  in  FCNFIL  is  a  direct  implementation  of  these 
actions  and  should  present  no  difficulties  to  the  FORTRAN 
programmer. 
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Lower  Halt  of  Integration  over  x. 

Crack  length,  function. of  age. 

Constant  value  for  crack  length. 

Crack  length  Inspection  threshold  beyond  which 
an  Inspection  Is  'perfect*. 

Crack  length  at  initiation; 

or,  1'th  coefficient  defined  by  equation  (4.99)  and 
used  to  solve  the  spline  equations. 

Crack  length  corresponding  to  the  fatigue  life 
Halt,  tf. 

Crack  length  at  t  -  0,  l.e.,  initial  crack  length. 
MaxLaua  Initial  crack  length. 

j'th  weight  in  n  point  quadrature  sun,  equation  (4. 14). 

Upper  Halt  of  integration  over  x. 

i'th  coefficient  defined  by  equation  (4.97)  and 
used  to  solve  the  spline  equations. 

Constant  in  density  functions. 

i'th  coefficient  defined  by  equation  (4.98)  and 
used  to  sol ve  the  spline  equations. 

Crack  detection  function. 

See  equation  (4.91). 

Subspace  of  uncraeked  structures. 

Subspace  of  cracked  structures. 

Subspace  of  structures  that  have  passed  a 
failure  criterion. 

Saall  interval  of  tlae. 

Miniaua  value  paraaeter,  (see  equation  3.32). 

Scaled  alalaua  value  paraaeter. 

Expected  tlae  to  failure. 

Expected  value  for  strength. 

Expected  value  for  the  failing  lead. 


SSo 


5*o 


c 


( 


f(R) 

f(t) 

f(t,n0) 

tix) 

\ 

VR> 

VW 

t\ R) 

**0 

fK(H.t,n0) 
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Sea  equatioa  (2,11). 

Function  of  tine  (arbitrary). 

Arbitrary  function  of  t  and  n^,  see  equation  (3. O 
Arbitrary  function  of  x. 

Idjait  for  Hq,  defined  by  equation  (2.80). 

Limit  for  nQ,  dependent  on  tbe  value  of  R. 

Defined  by  equation  (3*72). 

fQ  (R)  for  tbe  special  case 

Limit  for  Sq  ,  define  d  by  equation  (2.92). 

Oq  integrand  function  for  the  density  for 
strength.  (Squation  3. 14) 

nQ  integrand  function  for  the  contribution  to 
the  failure  density  for  strength  arising  from 
fatigue  life  exhaustion. 

Random  variable  representing  the  time  of  failure. 

Integrand  function  for  the  x  integration 

of  a  nested  integration  sequence,  equation  (4.41 ). 
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Integrand  function  for  the  y  integration  of 
a  nested  integration  sequence,  equation  (4.1*0). 

Integrand  function  for  the  z  integration  of 
a  nested  integration  sequence,  equation  (4.39). 

Integrand  function  for  the  a^  integration  of 
a  nested  integration  sequence,  equation  (3.133). 

Integrand  function  for  the  «t  integration  of 
a  nested  integration  sequence,  equation  (3.137). 

Integrand  function  for  the  p  integration  of 
a  nested  integration  sequence,  equation  (3.138). 

See  equation (£. 12}. 

nQ  integrand  function  for  the  failure  density 
for  strength. 

Function  used  in  the  evaluation  of  the  loss  factor, 
defined  by  equation  (3.60). 
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Q  Function  used  for  the  evaluation  of  the  lose 

factor,  defined  by  equation  (5.63). 

h  Length  of  integration  interval,  i.e.  h»b~a. 

Length  of  the  l'th  interval;  used  for  spline 
interpolation.  (Equation  (4.70)) 

H(x,  t)  Loss  factor,  equation  (2.40). 

H(^,^,n^,t)  Loss  factor,  in  terns  of  the  random  variables 

used  in  NERF.  Equations  (2.43)  to  (2.45). 

Bg(x)  Heaviside  step  function. 


i  Suffix,  usually  a  particular  value  in  a  series. 

I(a,b)  Integral  of  f(x)  over  the  interval  [a,b3,  equation  (4. 1). 

I.  (x.  ,x. ,, )  Integration  of  f(x)  over  the  i'th  Interval, 

1  1  11  c.vxi+3- 

I  (a,b)  Numerical  estimate  of  I(a,b)  using  n  integrand 

evaluations. 

I  (z.iZp)  Numerical  estiaate  of  a  multiple  integration  where 

z  is  the  outermost  integration  variable. 

I  (y*z)  Integrand  for  the  y  integration  of  a  multiple 

7  integration  sequence. 

I  (z)  Integrand  for  the  z  integration  of  a  multiple 

integration  sequence. 

I  (z)  Integrand  returned  by  a  numerical  evaluation 

procedure,  equation  (4.45). 

J  Index  denoting  a  particular  value  in  a  series. 

Often  used  for  the  age  values  defining  y'(t). 

k  Index  denoting  a  particular  value  in  a  series, 

or,  Dispersion  parameter  for  a  density  function. 

K  Total  number  of  time  values  for  which  the 

reliability  functions  are  evaluated. 
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Number  of  nodes  in  the  direction  for  the  loss 
factor  interpolation  table. 

Number  of  nodes  in  the  interval  hJ  for 
the  loss  factor  interpolation  table. 


Number  of  nodes  la  the  intervalQt^^,*^  for 
the  loss  factor  interpolation  table. 
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Average  load  application  rate. 

Loss  factor  (see  equation  5.183). 

5 an do m  variable  representing  applied  load. 

Table  entry  of  log(G#(.<k, /J^)) ,  equation  (5.129). 

Interpolated  value  of  log(G*)  for  the  j'thftline 

# 

Interpolated  value  of  log(G  )  for  the  j-M'th 
(3  line,  see  equation  (5.  13D. 

Second  derivative  function  aa  used  for  spline 
interpolation,  equation  (4.69). 

Value  of  n(x)  at  x»x^. 

Humber  of  nodea  uaed  to  define  f(x)  for  spline 
interpolation. 

Lover  Unit  for  Uq  for  the  probability  of 
detection. 

Lover  Unit  for  n.  for  the  risk  of  fatigue  life 
exhaustion,  equation  (3.85). 

Upper  linlt  for  nQ  for  the  ride  of  fatigue  life 
exhaustion,  equation  (3.85). 

Lover  Unit  for  nQ  for  the  density  for  strength 
equation  (3.88). 

Upper  linlt  for  n^  for  the  density  for  strength, 
equation  (3.88). 

Initial  age. 

Lover  Unit  for  after  default  Uniting. 

Upper  Unit  for  n^  after  default  Uniting. 

Lover  linlt  for  n^  for  the  probablUty  of 
failure,  equation  (3*80). 

Upper  linlt  for  n^  for. the  probability  of 
failure,  equation  (3*80). 

Nunber  of  integration  levels. 

Density  for  initial  crack  length. 
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&0  late grand  function  for  the  first  rf(t) 
integration,  equation  (3.85). 

nQ  integrand  function  for  the  second  rf(t) 
integration,  equation  (3.85). 

aQ  integrand  function  for  r0(t),  equation  (3.8 4). 

rv(t).Ps(t),  equation  (3.83). 

Density  for  the  tine  to  failure*. 

Density  for  initial  age. 

Density  funetLon  for  strength. 

Failure  density  for  strength. 

Joint  density  function  for  the  random  variables  X. 
Density  for  virgin  strength. 

Density  for  age  (given  t)|  generally  accounts  for 

previous  inspections. 

Density  for  age  given  Sq. 

Probability  of  detection  at  the  inspection  at  ti^. 

nQ  Integrand  function  for  the  probability  of 
detection,  equation  (3.82). 

Probability  of  failure. 

nQ  integrand  function  for  the  probability  of 
failure. 

Cumulative  proability  function  for  the  applied  load. 

Probability  of  load  exceedence. 

Probability  of  survival. 

Probability  of  survival  just  after  an  inspection. 
Probability  of  survival  Just  befor  an  inspection. 

Probability  of  survival  of 'a  population  of  replacement 
structures,  equation  (2.50). 
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n  point  quadrature  sum,  equation  ( 4..  1 4) . 

Index  denoting  level  of  subdivision  in  the 
adaptive  Simpson  integration  algorithm. 

Total  risk  rate. 

Sisk  of  fatigue  life  exhaustion. 
pff1^t,a0^#PS^* 

Pff2^,ao^*^S^t^* 

Ride  rate  for  the  k'th  subspace,  equation  (2.20). 
Limit  risk  rate  for  Inspection  procedure. 

Mean  risk  rate,  equation  (3.175). 

Sisk  of  static  fracure  by  fatigue. 

pfs(t,a0),P4(t>* 

Virgin  risk  (risk  rate  for  uncracked  structures) . 

Instantaneous  risk  for  uncracked  structures  in  D^. 

Instantaneous  risk  for  cracked  structures  In  0^. 

Random  variable  representing  strength. 

Median  strength  decay  function. 

«fc*f<0)*  equation  (2.84). 

See  equation  (2.90). 

e«-#(n0,^)f<|S)f  equation  (3.54).  Lover  bound  for 
R  given  nfj  and  p  for  the  subspace. 

Maximum  value  for  applied  load. 

Minimum  value  for  strength,  follovlng  default 
limiting. 

e 

Mesh  variable  for  the  fi  direction  of  the  loss 
factor  interpolation  table,  equation  (5.83). 

Mesh  variable  for  the  «c  direction  of  the  loss 
factor  interpolation  table,  equation  (5«88). 

Median  virgin  strength. 


1 


Proof  load 


S'Si' 


STS 


c 


( 


s(x) 


s4(t) 


S^(x,AXr) 


First  derivative  function;  used  for  spline 
interpolation,  equation  (4*64). 

Value  of  a(x)  at  xsx^. 

Inspection  removal  function,  equation  (2.52). 

Inspection  removal  function  derived  from  the 
Crack  detection  function,  equation  (5 .25). 

Simpson  3  point  rule  for  the  r'th  subdivision, 
equation  (4.6). 

Simpson  7  point  rule  for  the  r'th  subdivision, 
equation  (4.7). 


”0 

T(t> 

V"o> 

*1 

*1 


Time. 

Median  time,  or  age. 

Age  corresponding  to  ad  (after  default  limiting). 
Fatigue  life  of  a  given  structure. 

Median  fatigue  life,  after  default  limiting. 

Upper  bound  for  fi  for  a  I>2  domain  bounded  below 

by  “min**^*  *I"*f(^in)* 

Upper  bound  for  P  for  a  domain  bounded  below 
by  equation  (3.50). 

Crack  initiation  time  for  a  given  structure. 

Median  initiation  time  (or  initiation  age). 

Time  of  J'th  inspection. 

Ip'th  time  value  for  the  evaluation  of  the 
reliability  functions. 

Specified  evaluation  time  (there  are  N  values). 

Specified  time  for  the  calculation  of  strength 
functions. 

Initial  age  (same  as  nQ). 

General  reliability  function,  equation  (5.154). 
Term  depending  on  n^. 

Trapezoidal  2  point  rule,  equation  (4.26). 
Trapezoidal  3  point  rule,  equation  (4*27). 


ffl 


Tv(t*a0) 


Tv(t} 


TCot) 
T((J ) 


x 

X 


xl,max 

xi,Bin 


‘1 


*2 

*3 

h 

h 

h 


y 

y(x) 

y'(x) 

*i 

y,(*> 

y2(a) 


Taro  for  virgin  structure  contribution  to  the 
probability  of  detection,  equation  (5. 174). 

Correction  term  representing  virgin  structure 
contribution  to  Pg(t),  equation  (5»l80). 

Term  evaluated  by  the  function  PALP. 

Tera  evaluated  by  the  function  FBET. 

Location  parameter,  equation  (3*33). 

Scaled  location  paraaeter,  equation  (3*36). 

Vector  of  sample  values  of  the  random  variables  X. 

General  coordinate. 

i'th  value  of  x.  Used  to  denote  nodes  in  the 
spline  interpolation  or  used  to  define  the  initial 
subdivisions  In  the  adaptive  integration  algorithms. 

Maximum  value  in  the  sequence  of  values  of  x^. 

Minimum  value  in  the  sequence  of  values  of  x±. 

Sample  value  for  . 

Sample  value  for 

Sample  value  for  Xy 

Random  variable  representing  relative  fatigue  life. 

Random  variable  representing  initial  crack  length. 

Random  variable  representing  relative  residual 
strength. 

General  coordinate. 

General  function  of  x,  esp.  spline  interpolation, 
dy/dx. 

First  order  approximation  to  dy/dx  at  x  s x^. 

Value  of  y  at  x  =.  x^. 

Lover  limit  for  a  y  integration  in  a  nested 
sequence. 

Upper  limit  for  y  integration  in  a  nested 
sequence. 


5~M 


UQ,p) 


Transformed  random  variable  used  to  generalise 
the  density  functions,  equation  (5.35). 

General  coordinate. 

Lover  limit  for  an  integration  over  z.- 

Upper  limit  for  an  Integration  over  z. 

Standard  random  variable,  equation  (5.33). 

Virgin  strength  (Random  variable  and  sample  value). 

Lower  limit  for  at.  resulting  from  a  proof 
load  inspection,  equation  (2.5$). 

Lower  bound  for  *  ,  given  nQ  and  0  for  the 
Dg  subspace,  equation  (3. 52) . 

See  equation  (2.70). 


°Sii0i 


Defined  by  equation  (5.8?). 
Defined  by  equation  (5.106). 


K,4  -1 


*  value  on  the  line  <*f(|S )  *  R^ ,  see  Figure  5.14. 

oC  value  on  the  mesh  line  next  to  the  line, 

Rmox  fi«ur#  5.14. 

Upper  limit  for  o C  . 

Maximum  value  of  the  <y'»*  equation  (5.79). 
Lower  limit  for*. 

•Minimum  value  for  all  the  equation  (5.78). 

Lower  bound  for  *  for  the  D1  subspace  of  uncradced 
structures,  equation  (3.57). 

Low.r  li.lt  forvfor  th.  fir*  int«r«tl«  «.r  *  -a. 
by  the  function  FBST. 

Upper  limit  for  the  integrations  over*  made  by 
the  function  FBST. 

Lower  limit  for* for  the  2nd  integration 
over  *.  made  by  the  function  FBST. 


ft 

•* 

p' 

^dU0) 


*11* 


^  max 
Pmin 

Pp.K 

Pp»kb 

*i(V 


“min 


Pi 

fe 


Lower  limit  for  *-  on  the  line  .  Defined 

by  equation  (5*74)  and  used  for  the  loss  factor 
Interpolation  table. 

Upper  limit  for  ot  on  the  line  $9Py  Defined 
by  equation  (5.75). 

Random  variable  representing  age,  equation  (2.28)# 

^-1( as  used  in  equation  (2.72). 

See  equation  (3.65).  Also  used  in  equation  (5.136). 

Limit  function  for  £  ,  defined  by  equation  (3.51  )• 

0  value  defining  the  translation  of  the  proof  load 
boundary,  equation  (3.53). 

J'th  value  of  £  ,  as  used  to  define  the  function  f  (fS ) . 

I3  value  arising  during  the  interpolation  of  the 

loss  factor  near  the  line  Baaz~*y(?)»  equation  (5.137). 

Maximum  value  of  t/x^  or  (  p  -  nQ) . 

Minimum  value  of  t/Xj  »c  (p  -  nQ). 

Lower  limit  for  P  for  an  integration  along  the 
line  R**f(p)  in  J>2,  equation  (3.59). 

Solution  of  R.Rpf(^  )/f(  ^(Bq,  (S))  . 

**  for  Pp,R  but  **■ th  fisBmin‘ 

Lower  bound  for  p  given  aQ,  equation  (5**58). 

Lower  p  limit  for  integration  of  F^(p),  equation  (3.156). 

Upper  f  limit  for  integration  of  C ^& ) •  equation  (3.156). 


i'th  constant,  defined  by  equation  (4.93)  and  used 
for  the  solution  of  the  spline  equations. 


mf.*f) 

i 

fc*b. 


Coefficients  in  expansion  for  truncation  error  associated 
with  quadrature  sum,  equation  (4.15). 

.  »  —  * 

ml  if  tf  *  tf;  » 0  otherwise. 

Convergence  criterion,  typically  10“\ 

Absolute  error  criterion,  equation  (4.2). 


6'  2  9 


in 


Actual  error  Incurred  during  a  numerical  integration, 
equation  (4.43)* 

Estimated  absolute  error,  equation  (4.22). 

Error  associated  with  integration  over  the  Interval, 
Cv*i*ll»  a9u*tion  (4.24). 

numerical  parameter  used  in  Integration  algorithm 
to  control  errors,  equation  (4.44). 


n 


Error  associated  with  the  integration  rule, 
equation  (4*46). 


£-  (31 a)  Error  associated  with  the  z  Integration  in  a  nested 

,x  integration  sequence,  equation  (4.61). 

L  (z)  Error  associated  with  the  7  Integration  in  a  nested 

integration  sequence,  equation  ( 4. 6 1 ) • 


£rel 


Relative  error  criterion. 


£  abs  Absolute  error  criterion  used  for  the  z  integration, 

y*  .(resulting  from  the  behaviour  of  the  7  level  Integration. ) 

t- (z)  Error  associated  with  the  evaluation  of  the  z 

"  Integrand,  equation  (4.49). 


&z,abs  Absolute  error  criterion  used  for  the  7  integration, 

(resulting  from  the  behaviour  of  the  z  level  integration.) 

,  • 

*-  See  equation  (4*34). 


Coefficients  used  in  quadrature  ana,  equation  (4. 14). 


Coefficients,  defined  bf  equation  (4.93)  and  used  in 
the  solution  of  the  spline  equations. 

f  Standard  deviation. 


n 


Qamma  function 


fit)  orfif)  Relative  strength  function, 
f  ty/d  f. 

nz  Interval  length  for  the  r'th  level  subdivision  in 

the  adaptive  Simpson  algorithm,  equation  (4.12). 


no 


f<to 


A. 1.  Cross  Reference  Listing  for  Subroutines  and  Functions 

Th«  tabic  in  this  appendix  list a  the  subroutine a  and  function 
subprograms  la  REST,  NERPRE  and  NERPLT  in  alphabetical  order. 
Against  each,  the  page  number  for  the  documentation  in  thla 
report  la  given  together  with  a  statement  of  the  function 
of  that  sub-program. 

The  source  code  for  SERF  resides  In  five  files,  with 
the  sub-programs  arranged  in  hierarchical  order.  These  files 
are  named  HEBFPO.FOB  to  NKSFPtf.  FOR  with  NERFPO.FOR  containing 
the  .  sub-programs  that  are  highest  in  the  hierarchy.  The 
program  NERPLT  is  stored  in  a  file  called  NERPLT. FOR  and 
NERPRE  in  NERPRE. FOR. 

The  location  of  each  subroutine  in  the  source  files 
is  indicated  by  the  numbers  0,  1,2,  3 >  or  4  for  the  NERF 
routines;  PRE  for  NERPRE  and  PLT  for  NERPLT. 
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Name 

File 

Page 

ADAPTO 

3 

195 

ADAPT 1 

3 

198 

ADAPT2 

3 

168 

ADASET 

3 

177 

ADVNCE 

0 

262 

ALOG1 

2 

495 

ALPHAP 

2 

434 

ALP SET 

2 

331 

ALPTAB 

4 

356 

ARROUT 

4 

486 

ARRPLT 

2 

520 

BETALM 

1 

440 

BETCNG 

2 

332 

BETSET 

2 

333 

change 

PRE 

567 

CHECK 

PRE 

569 

CFIN 

0 

246 

CFNEW 

0 

286 

COMPRS 

PLT 

551 

00  NT 

4 

524 

CHKDEV 

2 

307 

CRKGR 

2 

508 

CRKINV 

2 

310 

DATIN 

PRE 

574 

DERI  V 

3 

222 

DIAG 

4 

526 

ECHO 

4 

475 

ERROUT 

3 

179 

EXP1 

2 

496 

EXTIME 

3 

492 

FALP 

1 

410 

FBET 

1 

413 

FCNFIL 

PRE 

575 

FDETO 

1 

418 

FDSR1 

1 

460 

Operation 

Outermost  integration. 

Kiddle  integration. 

Inner-most  integration. 

Initialise  all  integration  algs. 

Construct  time  sequence. 

Log  function. 

Find  <*. 

P 

Initialise  p*  (<*.). 

Find  u.  corresponding  to  BK. 

Write  2.  d.  array. 

Contour  map  2.d.  array. 

Find  p  limits. 

Change  PpCfl)  tor  nee  t. 
Initialise  pj(£). 

Edit  data  for  control  file. 
Display  control  file  data. 

Head  control  file. 

Update  control  file. 

Window  a  line. 

Contour  map  routine. 

Evaluate  da/ dt 
Evaluate  a(t). 

Evaluate  a~*(a). 

Input  function  file  from  VDU. 
Derivative  from  ordered  pairs. 
Diagonal  interpolation. 

Record  user  responses. 
Integration  error  handling 
Exponential  function. 

Run  time  monitor. 

Eq.  (5.182). 

Eq.  (5. 186). 

Edit  function  files. 

Pdet(t*B0>’ 

Integrand  for  fR( R,  t,^). 


Fit 


yt* 


Name 

File 

Page 

Operation 

FINISH 

3 

493 

Terminate  program  operation. 

FI  NT  BP 

3 

219 

Spline  interpolation. 

FLDFO 

1 

4?0 

pa0^a0ifH,f2^R,t,n0)# 

FLDRO 

1 

461 

p^CaQJfgCB*  t,n0). 

FLPROB 

0 

286 

Strength  functions. 

FNOR 

1 

436 

f  (8). 

FPDET 

0 

420 

Probability  oi  detection. 

FPLOTS 

PLT 

552 

Sat  lnpnt  functions  for  plotting. 

FPOINT 

PLT 

554 

Plot  ordered  pairs. 

FHPO 

1 

449 

Uq  integrand  for  rf(t). 

FRF1 

1 

452 

Integrand  for  p^U.iIq), 

FRF2 

1 

453 

Integrand  for  pff2(t,n0). 

FRLTO 

1 

421 

General  nQ  integrand. 

FBP 

2 

437 

Rr^JAKfj^no)). 

FRVO 

1 

424 

rY(t). 

FSIZE 

4 

533 

Character  string  for  a  number. 

F SOLVE 

3 

227 

Solution  of  equation. 

FSOLV2 

3 

22? 

Solution  of  equation. 

FHNC 

PLT 

555 

Input  'function  evaluation. 

GADJST 

1 

383 

Discontinuity  in  loss  factor. 

galp 

1 

376 

^interpolation  for  loss  factor. 

GRID 

4 

523 

Draw  interpolation  grid. 

GST  AH 

1 

378 

Evaluate  G*(*,0). 

OVAL 

1 

349 

Evaluate  G(*,£,ng). 

HEAD 

0 

295 

Write  heading  on  output  files. 

INDSI 

3 

232 

Index  location. 

INDLOW 

3 

233 

Index  location. 

I  NET  NT 

3 

199 

Summary  for  integration. 

INFLE1 

3 

201 

Error  estimate  for  ADAPT 1 . 

INFLE2 

3 

202 

Error  estimate  for  ADAPT2. 

INFST 

3 

203 

Initialise  error  processing. 

INFS  OP 

3 

204 

Suppress  integration  information. 

INI  TAB 

4 

358 

Initialise  loss  factor  interpolation. 

INTEST 

4 

476 

Logical  input  from  terminal. 

Name 

File 

Page 

Operation 

INTGIN 

4 

477 

Integer  input  from  keyboard. 

INTPLT 

2 

5t  2 

Contour  .  map  of  integrand^ 

I  SHOtJT 

4 

485 

Write  2,d.  integer  array. 

MERGE 

3 

235 

Merge  two  sequences  of  numbers. 

NERF 

0 

241 

Main  program  for  NERF. 

NEHPRE 

PRS 

563 

Main  program  for  NEHPRE. 

NERPLT 

PLT 

549 

Main  program  for  NERPLT. 

NODES 

1 

364 

Set  nodes  for  loss  factor  tens. 

OUTPUT 

0 

296 

Write  output  to  files. 

P 

4 

527 

Map  from  array  to  physical  space. 

P ALPHA 

2 

334 

PAUSCT 

PRE 

569 

Pause  while  displaying  data. 

PBETA 

2 

335 

PDF 

2 

336 

Density  function  evaluation. 

PDFCNG 

PRE 

570 

e 

Edit  density  function  parameters. 

PDFOUT 

PRE 

571 

Display  density  parameters. 

PDFSET 

2 

338 

Initialise  densities. 

PLOTD 

4 

535 

Plot  routine  for  SMOOTH. 

PLTPNT 

2 

515 

Plot  evaluation  points. 

PLTS 

PLT 

556 

Plot  sequence  of  ordered  pairs. 

PLTSET 

2 

503 

Initialise  outer  integrand  store. 

PLTSTR 

2 

504 

Store  outer  integrand  evaluation. 

PRNO 

2 

341 

v*°)- 

PROMPT 

4 

478 

Message  to  terminal. 

PSI 

2 

312 

ne>- 

PSISET 

2 

318 

Change  nodes  foryC^S). 

PSI EE V 

2 

316 

df/dtf. 

PSINV 

2 

317 

RANGE 

3 

229 

Range  limiting. 

READFN 

4 

448 

Read  function  file. 

REAEMF 

PLT 

550 

Read  function  file  -  many  functioi 

REALIN 

4 

480 

Real  number  input  from  terminal. 

RESET 

RINTV 

0 

1 

251 

366 

Set  nodes  for  pff1(ttao) 

Integral  term  for  loss  factor. 

RKTAB 

4 

360 

RK  from  eC ;  loss  factor  table. 

Name  File  Page  > 


SLGAM 

2. 

367 

KLINE 

2 

522 

RLOAD 

2 

321 

RLOSET 

2 

322 

HNONRM 

2 

342 

RNOSET 

2 

343 

RSKLOG 

1 

279 

RSKTOT 

1 

274 

SCLFCT 

4 

541 

SELECT 

PEE 

564 

SETGRF 

4 

536 

SETTAB 

0 

253 

SINSP 

1 

325 

SMOOTH 

4 

542 

STSFN 

2 

319 

TXTIN 

4 

433 

VALOUT 

PEE 

572 

WINDOW 

PLT 

557 

Operation 

Integrand  for  loas  factor  term. 
Construct  R»«r(#>  on  graph. 
r2(H). 

Change  nodes  for  r2(R). 
Normalise  density  for  aQ. 
Initialise  density  for  Sq. 
log(r(t))  and  other  functions. 
r(t)  and  other  functions. 

Find  plot  scale  factors. 

Select  new  option. 

Initialise  plot  space. 
Initialise  loss  factor  table. 
Inspection  removal  function. 
Graphical  smoothing. 

5(a). 

Text  input  from  terminal. 
Display  data. 

Control  windowing  operations. 


S' 9  S'  5~75 


A.  2.  Definitions  for  variables  la  COMMON 

The  variables  stored  In  the  various  common  blocks 
used  by  KERF  are  listed  in  this  Appendix.  Each  variable 
Is  listed  with  Its  mathematical  symbol,  where  appropriate 
and  a  statement  regarding  the  significance  of  that  variable. 

Hote  that  the  size  of  an  array  variable  Is  indicated 
and  that  logical  variables  are  denoted  by  the  word  'logical* 
in  the  symbol  column.  For  a  logical  variable,  the  condition 
represented  by  the  value,  true'  is  given  under  'significance'. 
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Name 

Common 

Block 

Symbol 

Significance 

AIP1(150) 

ALP COM 

*u 

Lower  limit  for  *  for  the  j'th 
column  of  the  loaa  factor  table. 

ALP1IN( 100 ) 

I NT COM 

Lower  limit  for  ol  for  the  j'th 
column  of  the  table  of  integrand 
values. 

ALP2( 1 50 ) 

ALP COM 

*2j 

Upper  limit  for  ot-  for  the  j'th 
column  of  the  loaa  factor  table. 

ALP21N( 1 00) 

INTCOM 

*2j 

Upper  limit  for  eC  tor  the  j'th 
column  of  the  table  of  integrand 
valuea. 

ALP  Cl 

GFCOM 

k 

Dispersion  parameter  for 

ALPC2 

CFCOM 

« 

Minimum  value  parameter  for 

ALPC3 

CFCOM 

V 

Location  parameter  for  Xj. 

ALP CON 

1ST  CON 

logical 

Variations  in  gj  ignored. 

ALP  MAX 

PAKCOM 

^max 

Maximum  value  for  <*■  . 

ALPM1N 

PAROOM 

44  min 

Minimum  value  for*-  . 

ALPV 

PAR  COM 

«c 

Current  value  of  rf- . 

AVQLT 

RISK CM 

E(F) 

Expected  time  to  failure. 

AVOES 

RISK CM 

E(F).Pp(t) 

BATCH 

BATCH 

logical 

Current  run  ia  in  batch  mode. 

BETAC300) 

PS100M 

'i 

Values  of  t*  used  to  define  f(0). 

Also  used  to  store  interpolation 
tables. 

BETC1 

CFCOM 

k 

Dispersion  parameter  for  X^. 

BETC2 

CFCOM 

• 

Minimum  value  parameter  for  Xj. 

BETC3 

CFCOM 

▼ 

Location  parameter  for 

BETOON 

INTCON 

Logical 

Variations  in  X^  Ignored. 

BETINT( 100 ) 

INTCOM 

Values  of  0  used  to  define  Integrand 
table,  (used  for  integrand  maps.) 

BETJD 

PSXDIF 

Pjd 

Value  of  |5j  delineating  linear 
or  polynomial  interpolation  for  y'(p). 

BETMAX 

PAS COM 

(9  - 

1  fimx  0 

Maximum  value  for  t/xj  . 

BETMIN 

PASCOM 

^  m  in  .  n0 

Minimum  value  for  t/x,  . 

BETV 

PAR  COM 

0 

Current  value  of  (f . 

BRHXQH 

FLDCOM 

f'*,(R/%ax) 

Upper  f  limit  for  given  S  line. 

BELOW 

FLDCOM 

Lower  $  limit  for  given  R  line. 

C4B3 

ADACOM 

V3 

Constant  used  by  adaptive  integration 
routines. 

5'?? 


r?7 


Nan* 

Comao & 
Block 

Symbol 

Significance 

CNO 

CBLENS 

*0 

Current  value  of  a^ 

CNAME 

FNAMBS 

5  character  atring  defining 
file  for  a(t). 

CND 

f!PTJg WS 

*d 

Inape  ctlon  Uniting  crack  length 

CONTI 

FLDCOM 

P,c#wir'(p)i. 

CO  NT  2 

FLDOOM 

p(L(K)/f(tf) 

CONTI 

LOG COM 

Not  used. 

OONTON 

INTOON 

lost  cal 

Integrand  naps  are  possible. 

CRK(IOO) 

GEKOOM 

*i 

Values  of  a  used  to  define  a(t). 

aun 

CBKFN 

Dispersion  parameter  for  Jg . 

CRK2 

CBKFN 

Minimum  value  parameter  fo  Xg. 

CHK3 

CBKFN 

Location  parameter  for  Jg. 

CUBSO 

TESTIN 

logical 

ADAPTO  is  currently  active. 

CURR1 

TBSTIN 

logical 

ADAPT  1  is  currently  active. 

DOS 

ODHSWT 

logical 

The  contour  map  routine,  CONT, 
will  interpolate  along  mesh 
diagonals. 

DINCH 

ODMDOT 

• 

Length  of  Interval  used  by  the 
smoothing  algorithm. 

K(30) 

ADA COM 

I5/2J’2 

For  us*  in  applying  (4.13)* 

KPS 

ADAOOM 

£ral 

Relative  error  criterion. 

KPS 

CFOOM 

cr*l 

Relative  error  criterion 
(temporary  storage). 

KPSt 

SMALCM 

\Q~W 

Convergence  liait  (e.g.  for  FSOLVE). 

Epsa 

SMALCM 

10’7 

Approx  10  x  precision  of 
computer. 

EPSINT 

PABCOM 

£rel 

Bel stive  error  criterion. 

ERBSSO 

INFOBO 

Absolut*  error  estimate  mad*  by 
ADAPTO. 

EBKBS1 

INFOB 1 

Absolut*  error  estimate  mad*  by 

ADAPT 1 

BRBES2 

INF0B2 

Absolut*  error  estimate  made  by 
ADAFT2 

ERRINO 

INFOBO 

Integration  (by  ADAPTO)  of  error 
estimates  sad*  by  ADAPT1. 

EBRIN1 

INFOB 1 

Integration  (by  ADAPT 1 )  or  error 
estimates  mad*  by  ADAPT2. 

FC8B 

BATCH 

First  character  transmitted  in 
a  prompt  message. 

PINTOO 

TESTIN 

3  character  string  identifying 
the  Integrand  for  ADAPTO 

FINT01 

TXSTIN 

— J 

3  character  string  identifying 
the  integrand  for  ADAPT1. 

S’?? 


ns 


Name 

Common 

Block 

Symbol 

Significance 

FULSV 

LOQCOM 

logical 

P-(t)  calculated  by  evaluating 
integral  expression  for  Pg(t). 

a(25oo) 

QCOM 

Interpolation  table  used  for 
evaluating  loss  factor. 

QEXPC2500 ) 

aeon 

Space  for  temporary  storage 
of  functions  for  2-0  maps. 

IGSIZE 

QCOM 

2500 

Size  of  Q  and  QEXP  arra  s. 

IBP 

PLTPMS 

Number  of  current  graph. 

INSLOS 

LOQCOM 

logical 

No  replacement  after  inspections. 

INSPTS 

LOOCOM 

logical 

Expressions  have  to  account 
for  a  previous  inspection. 

INTOFF 

INTOFF 

Flag:  if  O  PLTPNT  will  not 
try  to  plot  evaluation  points. 

iswr 

ISWT 

Flag:  if*0,  a  loss  factor  table 

Is  being  contoured  If+O,  an 
integrand  map  Is  being  contoured. 

ITt 

STINE 

Initial  value  of  job-time  In 
nllll— seconds. 

JO 

INFOHO 

Current  level  of  subdivision 
la  ADAPTO. 

J1 

INFOS 1 

Current  level  of  subdivision 
la  ADAPT 1. 

J  2 

INFOR2 

Current  level  of  subdivision 
in  ADAPT  2. 

JDIFF 

PSIDIF 

4 

Value  of  J  corresponding  to 

KJLLP 

GFCOH 

Integer  Identifying  standard 
density  function  for  Xy 

KBET 

CFCOM 

Integer  identifying  the  standard 
density  function  for  Xj. 

KCRK 

CBKFN 

Integer  idntifying  the  standard 
density  function  for  Xg. 

KLIN 

ALP CON 

'll. 

Number  of  nodes  In  direction 
for  loss  factor  table. 

L 

LEMAXO 

RFCON 

INFOBO 

Number  of  nodes  In  *  used  for 
evaluating 

Maximum  level  reached  by  ADAPTO. 

LEMAX1 

INFOS 1 

Maximum  level  reached  by  ADAPT 1 , 

LEMAX2 

INF0B2 

Maximum  level  reached  by  ADAPT2. 

LIHRSK 

LOQCOM 

logical 

Limit  risk  inspection. 

LOOPLT 

LOOPLT 

logical 

Current  plot  Is  mads  on  a  log 
basis,  (e.g.  logs  taken  before 
contour.!  drawn. ) 

S91 


59? 


Name 

Common 

Block 

Symbol 

Significance 

M 

LOADCM 

M 

Number  of  data  pairs  used  to 
da  fins  ?l(R). 

MAXLEO 

INFO HO 

Maxioum  allowable  aub division 
level  for  ADAPTO. 

MAXLE1 

INF0R1 

Maximum  allowable  subdivision 
level  for  ADAPT 1. 

MAXLE2 

INF0R2 

Maximum  allowable  subdivision 
level  for  ADAPT2. 

N 

PSICOM 

N 

Number  of  data  pairs  used  to 
define  f(i). 

NGRK 

CHE COM 

Number  of_data  pairs  used  to 
define  a(t>). 

NDC 

BET COM 

Number  of  data  pairs  used  to 
define  Cd(a). 

NBMAX 

DISCOM 

Number  of  time  values  for  which 
parameters  have  been  stored  for 
the  evaluation  of  strength  functions 

NIMAX 

RLIMTS 

Number  of  Inspections  that  have 
been  made. 

NINT 

I NT COM 

Number  of  nodes  In  $  direction  used 
for  Integrand  maps. 

NLEV 

GEMSKT 

Current  contour  level  number. 

UMAX 

HNVALS 

Number  of  evaluation  times. 

HOOT 

I NT CON 

Integer  Identifying  the  outermost 
integration  level. 

NPO 

ADACMO 

Number  of  initial  subdivision 
nodes  for  ADAPTO. 

NP1 

AJDACM1 

Number  of  initial  subdivision 
nodes  for  ADAPT  1. 

NP2 

ADAGM2 

Number  of  Initial  subdivision 
nodes  for  ADAPT2. 

NTSRM 

NTSRM 

Number  of  terms  evaluated  by 

FRFO. 

NVALSO 

1NFORO 

Number  of  integrand  evaluations 
made  by  ADAPTO. 

NVALS1 

XNF0R1 

Number  of  Integrand  evaluations 
made  by  ADAPT 1. 

NVALS2 

INF0R2 

Number  of  integrand  evaluations 
made  by  ADAPT2. 

ITVMA2D 

INFORO 

Maximum  number  of  integrand 
evaluations  for  ADAPTO. 

NVMAX1 

INFOR1 

Maximum  number  of  Integrand 
evaluations  for  ADAPT1. 

NVMAX2 

XMP0R2 

5sftaisai5r*iiijii,r“4 
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Name 

PERI 

PLD 

PLTINT 

PNAME 

POPLOS 

PREET(151) 

ps(3oo) 

PSIVAL 

PSJD 

R(300) 

812 

R3 

RATEL 

RDET 

RESTRt 

RP 

RFABG( 150) 

RFBET 

RFLT 

RISK 

RUK30O) 

RLXV 

RLMRSK(2) 

RLOADV 

RLT 

RLTDS(  10) 


Loo 


Common 

Block 

Symbol 

Significance 

LOaCOK 

logical 

Periodic  Inspection  procedure 
has  been  selected. 

PLDCOM 

Rp 

Proof  load  value. 

LOGCOM 

logical 

Integrand  plots  are  required. 

FRAMES 

5  character  string  identifying 
the  function  file  for  f (t ). 

LOGCOM 

logical 

The  loss  factor  term  is 
included  in  the  analysis. 

RLIMTS 

pd.t(‘V 

Probability  of  detection  at 
the  j'th  inspection. 

PSICOM 

r(fj) 

Values  of  ¥  used  to  define 
fi'i ).  Also  used  to  store  interpol¬ 
ation  tables. 

PAR  COM 

f<(» 

Current  value  of  f((S), 

PSIBIF 

Rvalue  corresponding  to 

LOADCM 

h 

R  values  used  to  define  PT(R) 

(or  r2(R)).  *■ 

ADAOOM 

1/12 

ADACOM 

1/3 

PAR  COM 

Average  load  application  rate. 

SISK  CM 

'*.(V 

Probability  of  detection  at  the 
last  inspection. 

LOGCOM 

logical 

Restart  from  last  run  if  possible. 

RISK  CM 

rf(t) 

Risk  of  fatigue  life  exhaustion. 

HP  COM 

PARCOM 

RISK CM 

wr«y 

rf(t).Pg(t) 

logical 

<  Nodes  used  for  evaluation  of 
pff1(t*a0)* 

Used  for  Unit  calculations  for 
rf(t)  terms. 

LOGCOM 

Expression  for  p«(t)  is  being 
evaluated.  Used  Co  select  options 
in  FBST  and  PALP. 

LOADCM 

log(r,(R)) 

Values  of  log(r2(B))  and  interpol¬ 
ation  tables  for  evaluating  r2tR). 

OP  COM 

Maximum  level  of  subdivision  to 
be  used  by  adaptive  integration 
routines. 

RLIMTS 

Limit  risk  levels,  first  value 
determines  first  inspection. 

Second  value,  all  others. 

PLDCOM 

r2(R) 

Current  value  of  r2(R). 

SISK  CM 

raM 

Probability  of  survival. 

SIS COM 

VW 

Probability  of  survival  at  a  time 
value  for  which  strength 
distributions  are  required. 

Name 

Common 

Block 

Symbol 

Significance 

RLTIN5 

RISK CM 

Pd*t^tl4 ) 

Fraction  of  population  removed 

by  all  previous  inspections. 

RMXAN 

RISK CM 

Mean  rlak. 

BMDO 

RMUO 

H0 

Median  virgin  strength. 

RNO 

NVALCM 

“o 

Initial  age. 

RNO CON 

1ST CON 

logical 

Variations  in  initial  crack 
length  gg,  ignored. 

RNOLIM 

CHKFN 

Upper  integration  limit  for  nQ. 

RNOMAX 

CRKFN 

n0,maz 

Default  ,  upper  limit  for  n^. 

RNDMIN 

CEKFN 

nO,min 

Default  lower  limit  for  nQ. 

BNAMX 

FNAMKS 

5  character  stringy identifying 

function  file  for  PT (R). 

it  r 

Age  values  defining  a(t). 

RHC( 100) 

CRKCOM 

RND 

NVALCM 

*d 

Age  corresponding  to  ad. 

BIfDI5T(  10) 

BZSCOM 

Sm 

Values  of  t  for  which  strength 
distributions  are  required. 

RMF 

NVALCM 

h 

Fatigue  age  limit. 

R5I 

NVALCM 

h 

Median  initial  age. 

RSZM 

RISC  CM 

“i 

“i 

t 

Time  of  last  inspection. 

RHINS(151) 

KLIMTS 

Sequence  of  Inspection  times. 

RKSOLD 

RISK  CM 

Within  RSKTOT,  last  time  for 
which  reliability  functions 
were  evaluated. 

RNSV 

PAR COM 

t 

Current  value  of  time. 

R5SVAL(151  ) 

rnvals 

*k 

Total  sequence  of  times  for 
which  the  reliability  functions 
are  required. 

ROLELT 

RISK  CM 

Pj(t) 

Density  function  for  the  time 
to  failure;  at  last  time  value. 

R S 

RISK CM 

rs(t) 

Rlak  of  static  fracure  by  fatigue 

RSLT 

RISK  CM 

p.(t).PsCt) 

RSLTD6( 10) 

OISCOM 

r(t).Ps(t) 

Value  of  Pg(t)  at  a  time  value 

for  which  strength  functions  are 
required. 

RTIMX 

RTIMX 

Maximum  run  time,  in  minutes. 

RTOT 

RISK  CM 

r(t) 

Total  risk  rate. 

RV 

RISK  CM 

rvCt) 

Virgin  risk. 

RVAL 

PAR  COM 

R 

Current  value  of  R. 

RVALS 

CTOOK 

Maximum  number  of  functions 
evaluations  for  adaptive 
integration  routines. 

SBR(  100) 

err  com 

t 

Values  of  t  used  to  define  Sj(t). 

sex 

SMTHSC 

Scale  factor  for  plotting  in 

X  direction,  (unlta/inch) 

Name 


Common 

Block. 


Symbol 


Significance 


SCI 

SFH(300) 

SHALL 

TESTIO 

TESTI1 

TITLE(2) 

txtuo) 

TXTMP<7) 

VARNO 

VARN1 

VIRGIlf 

xo 

XCOBO 

XCUR1 

UNTO 
XI  ITT  1 
XL 

XL(30) 
XPO( 100) 
XPI(IOO) 
XP2( 100) 
XVA»(3) 


SMTHSC 

Scala  factor  for  plotting  In 

T  direction,  (units/inch) 

LET COM 

Sj(t) 

Values  of  Sj(£)  used  to  define 
the  inspection  removal  function. 

SMALCM 

lO"1* 

TESTIN 

Factor  used  in  computing  absolute 
error  criterion  from  ADAPTO 
integration. 

TESTIN 

' 

Factor  used  in  computing  absolute 
error  criterion  from  ADAPT 1 
integration. 

TITLE 

10  characters  for  run  title. 

TXT COM 

Space  for  text  strings  used  to 
create  prompt  messages. 

TXTMP 

Additional  space  for  text  strings. 

TESTIN 

5  Character  string  identifying 
the  integration  variable  for 

ADAPTO. 

TESTIN 

3  character  string  identifying 
the  integration  variable  for 

ADAPT 1. 

LOOCOM 

logical 

Virgin  risk  tens  included  in 
calculations. 

AREAXT 

Lower  limit  of  X  for  plot  space. 

TESTIN 

Current  value  of  the  Integration 
variable  for  ADAPTO. 

TESTIN 

Current  value  of  the  integration 
variable  for  ADAPT 1. 

IHFOfiO 

(b-a)  for  ADAPTO. 

INF0B1 

(b-a)  for  ADAPT  1. 

AREAXT 

1/2^ 1 

Upper  limit  of  X  for  plot  space. 

ADACDM 

Used  to  calculate  gx  by 
adaptive  integratlonr routines. 

ADACMO 

Nodal  values  for  initial  sub¬ 
division  by  ADAPTO. 

ADACMO 

Nodal  values  for  initial  sub¬ 
division  by  ADAPT 1. 

ADACH2 

Nodal  values  for  initial  sub- 
by  ADAPT2. 

PLTTMS 

AREAXT 

Mlnlaua,  maximum  and  tic  aadc 
interval  for  X. 

Lower  limit  of  X  for  plot  space. 

TO 


ARSAXX 


603 


L03 


Mane 

Comaon 

Block 

Symbol 

Significance 

YL 

AREAXY 

Upper  Unit  of  Y  for  plot  apace. 

YMO(IOO) 

ADACMO 

Integrand  values  at  Midpoints 
of  Initial  subdivisions  for 
ADAPTO. 

TMI(IOO) 

ADACM1 

Integrand  values  at  midpoints 
of  Initial  subdivisions  for 

ADAPT 1. 

YM2( 100) 

ADA  CM2 

Integrand  values  at  midpoints 
of  initial  subdivisions  for 
ADAPT2. 

YPO(IOO) 

ADACMO 

Integrand  values  at  initial 
subdivision  boundaries  for 

ADAPTO. 

YPI(lOO) 

ADA  CM  1 

Integrand  values  at  initial 
subdivision  boundaries  for 

ADAPT 1. 

YP2( 100) 

ADACK2 

Subdivision  values  at  initial 
subdivision  boundaries  for 

ADAPT2. 

YVA R(3) 

PLTPMS 

Minimum,  maximum  and  tie  mark 
Interval  for  Y. 

ion* 


Uoif. 


A.  3.  Alphabetical  Listing  of  Prompt a  and  Error  Messages 

The  various  proapts  and  error  messages  are  tabulated  below 
In  alphabetical  order.  The  name  of  the  sub-program  In  which  the 
prompt  is  Issued  is  listed  against  each  prompt. 

Note  that  some  of  the  prompts  contain  numbers  or  text 
strings  that  are  inserted  at  the  time  the  prompt  Is  created. 
These  are  indicated  by  'SIS'  in  the  proapts  listed  below. 


Prompt 


Sub-program 


ADAPTS  USING  SSS  FOR  SSS  FROM  SSS  TO  ftt  XNFST 

ANS  x  SSS  ERR1  x  SSS  NVALS.SSS  INFINT 

AMS  rn SSS  SRR1  x  SSS  ERR2  = SSS  NVA LS»SSS, SSS  INFINT 

ANS  xSSS  ERR1  X  SSS  ERR2  *  SSS  ERR3  » SSS  NVALS«SSS,SSS.SSS  INFINT 

BETA  OUT  OF  RANGE  IN  GSTAR  GSTAR 

BETCNG  ...  RNS V  ZERO  BETCNG 

BOTH  SEQUENCES  EMPTY  IN  MERGE  MERGE' 

CAUTION  EXTRAPOLATION  X  a  SSS  FINTEP 

CONVERGENCE  FAILURE  IN  FSOLVE 

ARGaSSS  FSOLVE 

CONVERGENCE  FAILURE  IN  FSOLV2 

ARGaSSS  FSOLV2 

CRACK  LENGTH  NORMALISING  FACTOR  IS  ZERO  RNONBM 

CURRENT  VALUE  IS  SSS 

SMOOTHING  INTERVAL  SMOOTH 

DATA  FILE  NOT  ACCEPTABLE  ...  G  BEING  CALCULATED  SETTAB 

SOT  COOS  INTPLT 

DURING  THE  CALCULATION  OF  RISK 

ARE  PLOTS  REQUIRED?  ADVNCE 

INTER  AGAIN?  RE ALIN 

ENTER  POINT  CO EE  -  1,2, 3.4,5  OR  6  PLTPNT 

ENTER  5  VALUES  AT  A  TIMS  -  TERMINATE  WITH  0  RE ALIN 


Prompt 


Sub- pro gram 


ERHOR  IN  ADAPTS  USING  SSS  OVER  SSS 
ADAPTS;  SSS;  SSS  *  SSS 

ADAPTS;  SSS;  SSS  =  SSS  EBBODT 

ERROR  IN  GAMMA  FUNCTION,  IF AIL  -  SSS  PDFSET 

ERROR  IN  FDSR1  ...  PSI  IS  ZERO  FDSR1 

ERROR  IN  MERGE  ...  XLOW  IS  GREATER  THAN  XHIGH 

ALOW  »  SSS  XHIGH  =.  SSS  MERGE 

ERROR  -  N(SSS)  IS  LARGER  THAN  IRMX(SSS)  00 NT 

EXP1  ...  ARG  OUT  OF  BOUNDS  EXP1 

FBET  ...  PSZ  IS  ZERO  FOR  BETA  =  SSS  FBET 

FINDING  R55  CORRESPONDING  TO  LIMIT  RISE  ADVNCE 

FUNCTION  IS  ZERO  EVERYWHERE  ...  CANNOT  COPE  RANGE 

FUNCTION  LIMITS 

LEVELS?  ARRPLT 

USE  LOG  INTERPOLATION?  ARRPLT 

G  ARRAY  READ  FROM  DISK  FILE  SETTAB 

GSTAR  ...  SSS,  SSS  .IS  ILLEGAL  '  GSTAR 

INCLUDE  R  LINES?  INTPLT 

INCLUDE  GRID?  GRID 

INDICATE  MAX  LEVELS  FOR  PLOTTING 
FUNCTION  EVALUATION  POINTS 
BETA 

ALPHA  PLTPNT 

INFORMATION - NS  »  SSS  RSKTOT, 

FLPROB 

INITIALISE  INTEGRAND  PLOTS 
BETA  VALUES  BETWEEN  SSS  AND  SSS 

BETAMIN,  BETAMAX,  BETASTEP  SETPLT 

ALPHA  VALUES  BETWEEN  SSS  AND  SSS 

ALPMIN,  ALPMAX,  ALPSTEP  SETPLT 

INSUFFICIENT  DATA  TO  PLOT  PLTOUT 

INTEGRAND  PLOT?  INTPLT 

INTEGRAND  INFORMATION  PLOTTED  ADVNCE 

LENGTH  OF  X  AXIS  (INCHES)  SETGRF 

LENGTH  OF  Y  AXIS  (INCHES)  SETGRF 

LIST  TERMINATED  RE ALIN 

LIMITS  AND  NUMBER  OF  INTERVALS  RE ALIN 

LIMIT  EXCEEDED  REAUN 


Prompt 


Sub-Program 


HEW  VALUE  FOR  NT IP 
NO  TIME  VALUES 

MODAL  STORAGE  LIMIT  OF  SSI  EXCEEDED 

NOT  ENOUGH  STORAGE  FOR  CRA<X  GROWTH  FUNCTION 

NOTHING  TO  PLOT 

OUTER  INTEGRAND  PLOT 

ARGUMENT  VALUES  ARE  BETWEEN  SIS  AND  SIS 

XMIN,  XMAX,  XSTEP 

INTEGRAND  VALUES  ARE  BETWEEN  SIS  AND  SSS 
YMIN,  TMAX,  ISTEP 

OUTER  INTEGRAND  PLOT? 

PBETA  ...  ARG  IS  ZERO 

PLOT  G  FUNCTION? 

PLOT  G  INTEGRAL? 

PLOT  LOSS  FACTOR? 

PRINT  G  FUNCTION? 

PRINT  G  INTEGRAL? 

PRINT  INTEGRAND  VALUES 

PROBABILITY  OF  DETECTION 

PROBABILITY  OF  FAILURE 

PROBABILITT  OF  SURVIVAL  HAS  REDUCED  TO  0.0 
PROB  DIST  OF  FAILING  LOAD  CALCULATIONS 
PSIDEV  ...  NO  DATA 
R  LIMITS  BEING  CHANGED 
R  VALUES 
RF  TERM 

RISK  AFTER  INSPECTION  GREATER  THAN  LIMIT  RISK 
RISK  AT  INSPECTION 
RISK  FOLLOWING  INSPECTION 
RISK  FUNCTION  RSLT 
RUN  SSS  TERMINATED 
STORAGE  INSUFFICIENT  IN  MERGE 
SUBDIVISION  LIMITED  X  -  SSS  LEVEL  «  SSS 
TF  IS  BEING  CHANGED 
TX  IS  BEING  CHANGED 
TIME  LIMIT  EXCEEDED 


INTPLT 

ADVNCE 

SPROUT 

CESGR 

PLTOOT 

PLTOUT 

PLTOUT 

PLTSET 

PBETA 

SET  TAB 

SETTAB 

SETTAB 

SETTAB 

SETTAB 

INTPLT 

FDET 

RSKTOT 

RSKTOT 

FLPROB 

PSIDEV 

SETTAB 

INTPLT 

RSKTOT 

ADVNCE 

ADVNCE 

ADVNCE 

RSKTOT 

FINISH 

MERGE 

ERROUT 

SETTAB 

SETTAB 

SXTIME 


Prompt 


Sub-pro  grt 


USING  NTYP  *  SIS  INTEGRAND  MATRIX  IS  If  |  BY  Iff 

CHANGE  NT  IP?  INTPLT 

USING  NT  TP  x  Ilf  INTEGRAND  PLOT  FAILURE  AT  J  SIS  INTPLT 

VIRGIN  RISK  TERM  FRVO 

VIRGIN  SURVIVORSHIP  TERM  FRVO 

••  WARNING  **  F(HIGH)  -  Iff  BANGS 

••  WARNING  ••  F(LOW)  »  SIS  BANGS 

***  WARNING  FOB  SURVIVORSHIP  CALCULATION 
IF  THE  RNSVAL  INTERVALS  ARE  LARGE 

FULL  SURVIVORSHIP  SHOULD  BE  USED  ADVNGB 

•*  WARNING  •*  ERROR  GREATER  THAN  REQUESTED  INFINT 

*•  WARNING  **  TOTAL  ERROR  GREATER  THAN  REQUESTED  INFINT 

XKAX  (SIS)  GREATER  THAN  LARGEST  NODE  ERROUT 

XMIN  CSSS)  LESS  THAN  SMALLEST  NODE  ERROUT 

5  VALUES  ACCEPTED  BE  ALIN 

SIS  ERROR  (SIS)  GREATER  THAN  REQUESTED  (ISIS)  ERROUT 

SIS  FUNCTION  VALUES  EXCEEDED  ERROUT 


A. 4.  Program  Assembly 


The  source  cods  for  SERF,  NERPRE  and  NKRPLT  is  written 
in  FORTRAN  IV  as  implemented  on  the  ISC  System- 10  at  ARL. 

The  code  for  KERF  resides  in  five  files; 

HERFPO.FOR 

NERFP1.F0R 

NERFP2.F0R 

■KERFP3.F0R 

HERFP4.F0R 

which  contain  the  subroutines  in  hierarchical  order,  with 
the  highest  level  subroutines  in  HERFPO.FOR.  If  these  files 
are  compiled  and  searched  in  the  above  order  they  form  a 
library  of  subroutines  which  can  be  loaded  into  any  program 
making  use  of  any  combination  of  the  NERF  subroutines  without 
the  necessity  for  multi pit  passes  through  the  library. 

The  only  routine  required  by  NERF  that  is  not  in 
the  above  files  or  part  of  the  stardard  libraries  Installed  on 
the  OEC  System- 10  (which  include  the  plot  subroutines)  is  the 
function  that  evaluated  the  gamma  function  required  by  PDFSET. 

The  HAG  library  must  be  searched  to  obtain  this  function. 

The  program  KERF  can  be  assembled  by  loading  the  compiled 
versions  of  the  above  files  in  numerical  order  and  then  searching 
the  HaO  library. 


The  program  KERPRE  resldeMn  the  file  HE8PRI.F0R  which 


contains  the  subroutines  and  functions  described  in  Section  5*11* 
The  program  is  assembled  by  loading  the  compiled  version 
of  this  file  and  then  searching  the  main  KERF  library  to 
complete  the  assembly. 

The  program  NEHPLT  resides  in  a  file  called  HERPLT.FDR 
and  is  loaded  in  the  same  way  as  NEHPRE. 
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16.  COSAT  I  Grow 

Fatigue  models 


The  computer  program  SERF  (Numerical  Evaluation  of  Reliability 
Functions)  has  been  designed  to  evaluate  the  reliability  functions 
that  rssult  from  tbs  application  of  raliability  analysis  to  tbs 
fatigue  of  aircraft  structures,  in  particular  those  reliability 
functions  derived  by  Payne***  and  his  co-workers  at  the  Aeronautical 
Research  Laboratories.  The  NERF  Program,  although  baaed  on  the  Payne 
reliability  models,  is  capable  of  extension  to  mors  coaplex  models 
as  the  need  arises. 

This  document  details  the  mathematical  developamnt  of  the 
liability  functions  evaluated  by  NBRF  and  describes  the  cosgutcr 
am  in  sufficient  detail  to  allow  desired  modifications. 
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